Code Conversion Guide/de: what changed

Revision 2 to 3. Removed lines have a minus sign; added lines have a plus sign.

Old	New		Line
1	1		Diese Seite handelt davon, wie man bestehenden Delphi oder Kylix Code konvertiert oder portiert, um ihn mit dem [[Free Pascal/de\|Free Pascal]] Compiler und der Lazarus IDE zum Laufen zu bringen. Obwohl Lazarus und der Free Pascal Compiler gemeinsame Aspekte mit Delphi und Kylix haben, sind sie keine Klone. Es gibt eine Anzahl von Bibliotheksaufrufen und Konventionsunterschieden... und in einigen Bereichen ist FPC erweitert und kann im Hinblick auf korrekte Syntax anspruchsvoller sein. Bitte schauen Sie im [[Lazarus For Delphi Users/de\|Lazarus für Delphi-Benutzer]] Handbuch für eine Beschreibung einiger funktioneller Unterschiede nach.
2	2
3	3		Der Zweck dieses Handbuchs ist es, einige der spezifischen Unterschiede zu dokumentieren, die häufig während des Codekonvertierungsprozesses auftreten, wenn existierender Code von Delphi nach Lazarus übersetzt wird.
4	4
5	5		Dieses Dokument wurde im Bereich Wissensbasis des Wikis platziert, so dass es einfach von jedem erweitert werden kann, der auf ein einzigartiges Problem gestoßen ist und andere darauf aufmerksam machen möchte.
6	6
7	7		## Auswahl einer Komponente oder Bibliothek für die Konvertierung
8	8
9	9		### Wo Code zum Konvertieren zu finden ist
10	10
11	11		Im Internet ist eine MENGE Code verfügbar, der für die Verwendung mit FPC und Lazarus konvertiert werden kann. Hier ist eine [[Page Of Code Sites\|Seite]], die einfach ein Anfang ist. Bitte erweitern Sie die Seite, wenn Sie weitere Stellen kennen. TurboPower Software hat vor kurzem ihr gesamtes kommerzielles Angebot unter der MPL heraus gegeben. Eine Liste der verfügbaren Packages ist [hier](http://sourceforge.net/users/tpsfadmin/) zu finden.
12	12
13	13		Um doppelten Aufwand zu vermeiden, sind bereits konvertierte Packages auf der [[Components and Code examples]] Seite aufgeführt. Wenn Sie ein Package konvertiert haben oder daran arbeiten, dann fügen Sie bitte eine Notiz auf der [[Current conversion projects]] Seite hinzu.
14	14
15	15		### Lizenzierung
16	16
17	17		Lizenzen für existierenden Code reichen von Freeware/Public Domain bis zu eingeschränkten Versionen, welche Modifizierung, Weiterverteilung und kommerzielle Verwendung verbieten. Bevor Sie irgendein Package konvertieren, ist es eine gute Idee, seine Lizenz zu überprüfen und sicherzustellen, dass sie mit Lazarus und dem Free Pascal Compiler kompatibel ist. Lizenzauswahl ist bei Komponenten besonders wichtig, seit das Ablegen auf einem Formular eine nicht gewollte oder inkompatible Lizenz für die gesamte Anwendung aufbürden kann.
18	18
19	19		Wenn Sie Komponenten konvertieren, respektieren Sie bitte die Wünsche des Originalautors und belassen alle Copyright- und Lizenz-Header mit Email-Adressen und URl's. Es gehört zum guten Ton und ist oft hilfreich, um den Autor zu informieren, dass seine Komponente konvertiert wurde... besonders wenn sich die Komponente unter einer restriktiven Lizenz befindet. Neues Interesse an einer alten oder vergessenen Komponente kann manchmal die Autoren inspirieren, ihr Original und die allzu restriktive Lizenzierung zu überarbeiten.
20	20
21	21		Im Allgemeinen sind Public Domain (Freeware) und die LGPL/MPL Komponenten die flexibelsten zum Vertreiben. Für mehr Information ist die [Open Source Definition](http://www.opensource.org/docs/definition.php) ein guter Platz zum Starten. Dort gibt es auch verschiedene Vergleiche, die verdeutlichen, was die verschiedenen Lizenztypen bedeuten und welchen Einfluss sie auf den Code haben, auf den sie sich beziehen. Suchen Sie nach "open source license comparison"
22	22
23	23		### Abhängigkeiten
24	24
25	25		Ein anderer Schritt vor einer Konvertierung ist, dass Sie überprüfen, ob der Code verborgene Abhängigkeiten von anderen Packages enthält, die vielleicht nicht verfügbar sind oder einen beträchtlichen Konvertierungsaufwand darstellen. Einige Freeware-Angebote sind gebunden an oder erweitern proprietäre Packages, die häufig nicht mehr erhältlich sind oder mit ungeeigneten Lizenzen versehen sind.
26	26
27	27		### Compiler Probleme
28	28
29	29		Siehe:
30	30
31	31		- [bekannte Probleme](http://www.freepascal.org/probs.html)
32	32		- [Nichtbereinigte Bugs](http://www.freepascal.org/bugs/db.php3?statusfield=Unfixed)
33	33
34	34		### Plattformen und OS Probleme
35	35
36	36		Lazarus und der Free Pascal Compiler sind [[Glossary\|cross-platform]] und cross-architecture Entwicklungswerkzeuge. Im Gegensatz dazu wurde der existierende Delphi-Code meistens speziell für einen Intel Prozessor unter Win32 entwickelt. Wenn Ihr Kandidat sehr viel Win32 spezifischen Code enthält, ist es häufig günstiger, nach einer weniger plattformabhängigen Alternative zu suchen. Aber lassen Sie sich davon nicht entmutigen. Es ist erstaunlich, was die LCL unterstützt!
37	37
38	38		## Durchführen der Konvertierung
39	39
40	40		### Einrichten der Lazarus Umgebung für ein Konvertierungs-Projekt
41	41
42	42		#### Erstellen eines Testprojekts
43	43
44	44		- Kopieren Sie den zu konvertierenden Code in ein Unterverzeichnis (z.B.: convertdir)
45	45		- Starten Sie Lazarus
46	46		- Datei -\> Alles speichern in das convertdir Unterverzeichnis. Aussagekräftige Namen für Projekt und Units sind optional.
47	47		- Öffnen Sie die zu konvertierende "main" Unit in convertdir
48	48		- Fügen Sie zum Projekt hinzu: Projekt -\> Datei im Editor ins Projekt aufnehmen
49	49		- Starten Sie Werkzeuge -\> Schnelle Syntaxüberprüfung oder Start -\> Alles neu erstellen um loszulegen.
50	50
51	51		#### Grundsätzlich beachten
52	52
53	53		- Groß- und Kleinschreibung von Dateinamen werden unter der Version 1.0.x des Compilers unterschieden. Wenn Sie mit dieser Version arbeiten, schreiben Sie alle Dateinamen klein. Sie werden "File not found" Fehler bekommen, wenn Sie es nicht tun.
54	54
55	55		#### Delphi VCL, Kylix CLX Quellen in Lazarus
56	56
57	57		Während der Konvertierung von Delphi/Kylix Quellen ist es oft hilfreich, eine 'find declaration' zu machen, um zu sehen, was eine bestimmte Funktion macht. Die Lazarus IDE kann die Delphi/Kylix Quellen analysieren. Um dies zu tun, werden einige Suchpfade und Compilereinstellungen benötigt. Sie können dies einfach einrichten unter
58	58
59	59		Einstellungen -\> CodeTools Defines Editor -\> Vorlage einfügen
60	60
61	61		### Konvertierungsprobleme und Lösungen
62	62
63	63		#### Delphi / Kylix Datei-Entsprechungen in Lazarus
64	64
65	65		\| \| \| \|
66	66		\|----\|----\|----\|
67	67		\| Delphi / Kylix \| Lazarus \| Beschreibung \|
68	68		\| .pas .dfm / .xfm .dcu / .dpu .dpr (main project file) .res .dof / .kof --- --- --- \| .pas, .pp .lfm .o .lpr --- --- .lrs .lpi (main project file) .ppu \| Pascal Unit Datei Formulardaten Datei Compilierte Unit Datei Projektdatei Ressourcendatei Projektoptionen Datei Lazarus Ressourcen Datei Lazarus Projekt Informations Datei FPC Unit Beschreibungsdatei \|
69	69
70	70		#### Konvertierung von Delphi Projekten/Formularen/Units nach Lazarus
71	71
72	72		Benennen Sie die .dpr Datei in eine .lpr Datei um. Kommentieren Sie die
73	73
74	74		{\$R *.res}
75	75
76	76		Direktive aus oder entfernen Sie und fügen eine
77	77
78	78		{\$mode delphi}{\$H+}
79	79
80	80		oder
81	81
82	82		{\$mode objfpc}{\$H+}
83	83
84	84		Direktive zur .lpr Datei hinzu. Die Lazarus IDE kann diese Konversion mit dem Tools-Menüpunkt "Convert Delphi Project to Lazarus Project" unterstützen. Sie fragt nach einer .dpr (Delphi Project) Datei und konvertiert sie in eine .lpr; außerdem erzeugt sie die .lpi Datei und konvertiert alle Units.
85	85
86	86		Viele existierende Delphi Formulare können durch Verwendung des in die IDE eingebauten .dfm to .lfm form Umwandlers konvertiert werden, damit sie mit Lazarus richtig funktionieren. Er ist im Werkzeuge Menü als "Convert DFM file to LFM" zu finden. Öffnen Sie den file Dialog, wählen Sie die dfm Datei aus und der Umwandler wird den Rest erledigen.
87	87
88	88		Wenn Sie die ganze Unit konvertieren müssen (mit oder ohne ein Formular), enthält Lazarus auch ein eingebautes "Convert Delphi unit to Lazarus unit", welches das folgende für Sie erledigt -
89	89
90	90		1. berichtigt die Schreibweise (groß/klein) der include Dateinamen und uses Abschnitte.
91	91		2. konvertiert die .dfm Datei in eine .lfm Datei (gegenwärtig ohne Inhaltsprüfung, nur Formatierung)
92	92		3. erzeugt eine leere .lrs Datei (der Inhalt wird später erzeugt)
93	93		4. fügt die
94	94		{\$mode delphi}
95	95
96	96		Direktive hinzu
97	97		5. ersetzt die windows Unit durch LCLIntf
98	98		6. fügt die LResources Unit hinzu falls erforderlich (i.e., if unit.lrs is to be used;
99	99		uses LResources
100	100
101	101		can be in the implementation part)
102	102		7. entfernt die variants Unit
103	103		8. entfernt die
104	104		{\$R *.dfm}
105	105
106	106		Direktive
107	107		9. fügt den initialization Abschnitt und die
108	108		{\$i unit.lrs}
109	109
110	110		Direktive hinzu
111	111
112	112		#### Auswahl des richtigen Compilermodus
113	113
114	114		Der [[Free Pascal/de\|Free Pascal]] Compiler unterstützt 5 unterschiedliche Pascal Modi. Zum Beispiel TP für Turbo Pascal, lässt Sie Turbo Pascal Units kompilieren. Es gibt auch einen DELPHI Kompatibilitäts-Modus, der gesetzt werden kann, um bestehenden Code einfacher zu konvertieren. Lazarus bevorzugt den OBJFPC Modus, welcher fast dem DELPHI Modus gleicht, aber weniger mehrdeutig als die Delphi Syntax ist. Hier sind die wichtigen Punkte:
115	115
116	116		Der Modus kann auf der Befehlszeile oder beim Start der Quelle gewählt werden. Die Verwendung der Befehlszeile hat den Vorteil, dass Sie die Quelle nicht ändern müssen, aber den Nachteil, dass anderes erzählt werden muss.
117	117
118	118		Die meisten Delphi Units können mit dem [[Free Pascal/de\|Free Pascal]] Compiler kompiliert werden, wenn man gleich nach dem Unitnamen folgendes hinzufügt:
119	119
120		-	~~`{$IFDEF FPC}`\~~
121		-	~~` {$MODE DELPHI}`\~~
122		-	~~`{$ENDIF}`~~
	120	+	```
	121	+	{$IFDEF FPC}
	122	+	{$MODE DELPHI}
	123	+	{$ENDIF}
	124	+	```
123	125
124	126		Für mehr Details über die [[Free Pascal/de\|Free Pascal]] Modi siehe die [Free Pascal Dokumentation](http://www.freepascal.org/docs-html/prog/progap4.html#progse62.html). Für Information zu Laufzeitvariablen des Compilers (z.B. aktueller Modus) siehe [Free Pascal Dokumentation](http://www.freepascal.org/docs-html/prog/progap7.html#x310-311000G).
125	127
126	128		#### Cross-Plattform Überlegungen
127	129
128	130		- Das Verwenden von Inline Assembler ist immer problematisch, weil der Code dann nur auf Intel-Rechnern läuft. Es kommt auch vor, dass Entwickler Code in Pascal schreiben, aber eine optimierte Alternative in Assembler entwickeln, die durch ifdef-Konstrukte nur für Intel-Rechner gilt. Auch TurboPower selbst verwendet diese Technik an verschiedenen Stellen. Wenn das bei einem Package, das Sie übernehmen der Fall ist, schalten Sie auf den Modus Pascal.
129	131		- Verwenden Sie keine spezielle Speicheradressen, wie z. B. aus dem BIOS Datenbereich. Finden Sie heraus, was der Code erreichen will und suchen Sie nach einer Alternative, die für alle Plattformen funktioniert.
130	132		- Verwenden Sie keine Prozessor-spezifischen Tricks (wie z. B. die Intel TSC-Register), ohne dass Sie den Code in einem ifdef-Konstrukt als Plattform spezifisch markieren und entwickeln Sie eine Alternative für die anderen Plattformen.
131	133		- Generell gilt also: Wenn Sie Betriebssystem-spezifischen Code benötigen, dann müssen Sie IFDEFs verwenden. Siehe unten für eine Liste der Makros.
132	134
133	135		#### Hilfreiche Compiler Variablen / Defines / Makros
134	136
135	137		Um Code zu schreiben, der sich auf verschiedenen Systemen unterschiedlich verhält, können Sie die
136	138
137	139		{\$IFDEF Name}
138	140
139	141		Anweisungen verwenden.
140	142
141	143		- {\$IfDef LCL}
142	144
143	145		Diese Variable ist definiert, wenn das LCL Package verwendet wird. Hilfreich, um Code zu schreiben, der mit der LCL und Delphi funktioniert. For compatibility reasons FPC defines the DELPHI makro in mode Delphi. So you can not use {\$IFNDEF DELPHI}.
144	146
145	147		- {\$IfDef LCL}
146	148
147	149		This variable is defined, when using the LCL package. Useful to write code, that works with the LCL and Delphi.
148	150
149	151		- {\$IfDef LCLGtk}
150	152
151	153		,
152	154
153	155		{\$IfDef LCLWin32}
154	156
155	157		,
156	158
157	159		{\$IfDef LCLQt}
158	160
159	161		, ...
160	162
161	163		Diese Variable ist definiert, wenn das LCL Package verwendet wird und das spezifische Widgetset benutzt wird. Hilfreich um Code zu schreiben, der mit der LCL auf einer spezifischen Plattform funktioniert.
162	164
163	165		- {\$IfDef FPC}
164	166
165	167		Diese Variable ist definiert, wenn der FPC Compiler verwendet wird. Hilfreich um Code zu schreiben, der mit FPC und Delphi funktioniert.
166	168
167	169		- {\$IfDef Unix}
168	170
169	171		,
170	172
171	173		{\$IfDef Win32}
172	174
173	175		, ...
174	176
175	177		Von FPC für das aktuelle Ziel OS definiert. Delphi definiert "Linux", "Win32" und "MSWindows". [[Free Pascal/de\|Free Pascal]] läuft auf viel mehr Plattformen und daher wird empfohlen, allgemeinere Begriffe zu verwenden. Zum Beispiel ist "Unix" definiert für Linux, FreeBSD, NetBSD und OpenBSD, wo Lazarus bereits läuft. Verwenden Sie
176	178
177		-	~~`{$IfDef Linux}`\~~
178		-	~~` {$Define Unix}`\~~
179		-	~~`{$EndIf}`~~
	179	+	```
	180	+	{$IfDef Linux}
	181	+	{$Define Unix}
	182	+	{$EndIf}
	183	+	```
180	184
181	185		als "work around" für Kylix.
182	186
183	187		- {\$IfDef ENDIAN_BIG}
184	188
185	189		Diese Variable wird auf Prozessoren wie dem PowerPC definiert (zum Beispiel ältere Apple Computer, bis MacOSX 10.2), die eine im Vergleich zu Intel-Prozessoren umgekehrte Byte Order haben.
186	190
187	191		- {\$IfDef ENDIAN_BIG}
188	192
189	193		Für mehr Details siehe die [Free Pascal Dokumentation](http://www.freepascal.org/docs-html/prog/prog.html#QQ2-23-21).
190	194
191	195		#### 32 bit / 64 bit Unterstützung
192	196
193	197		Pointers under 64bit need 8 bytes instead of 4 on 32bit. The 'Integer' type remains for compatibility 32bit. This means you can no longer typecast pointers into integers and back. FPC defines two new types: PtrInt and PtrUInt. PtrInt is a 32bit signed integer on 32 bit platforms and a 64bit signed integer on 64bit platforms. The same for PtrUInt, but unsigned integer instead. Use for code that should work with Delphi and FPC:
194	198
195		-	~~` {$IFNDEF FPC}`\~~
196		-	~~` type`\~~
197		-	~~` PtrInt = integer;`\~~
198		-	~~` PtrUInt = cardinal;`\~~
199		-	~~` {$ENDIF}`~~
	199	+	``` pascal
	200	+	{$IFNDEF FPC}
	201	+	type
	202	+	PtrInt = integer;
	203	+	PtrUInt = cardinal;
	204	+	{$ENDIF}
	205	+	```
200	206
201	207		Ersetzen Sie alle integer(SomePointerOrObject) mit PtrInt(SomePointerOrObject).
202	208
203	209		#### Finden eines fehlenden Bezeichners
204	210
205	211		Es gibt Unterschiede darin, wie die LCL organisiert ist im Vergleich zur Delphi VCL. Wenn Sie einen "not found" Compilerfehler erhalten über eine wichtige Klasse oder Bezeichner, stehen die Chancen gut, dass Sie die Klasse oder den Bezeichner in einer anderen Unit finden könne. Eine komplette Cross-Reference können Sie finden, indem Sie grep auf das Verzeichnis lazarus/docs/xml oder das Unterverzeichnis lcl anwenden.
206	212
207	213		Zum Beispiel erzeugt der häufig verwendete TButton üblicherweise einen Fehler im Delphi Code, weil er sich in der Unit buttons.pp befindet. Das folgende Kommando findet die richtige Unit sehr schnell (im Lazarus Quellenverzeichnis):
208	214
209		-	~~` grep -in ' tbutton =' lcl/*`~~
	215	+	```
	216	+	grep -in ' tbutton =' lcl/*
	217	+	```
210	218
211	219		#### Wichtige Unit Unterschiede zwischen Lazarus und Delphi
212	220
213	221		Bitte ergänzen Sie diesen Abschnitt!
214	222
215	223		- Windows-\>Interfaces, LCLIntf, LCLType, LCLProc, VCLGlobals, ...)
216	224
217	225		Da die LCL nicht Windows-spezifisch ist, ist der Code, der sich in der Delphi Windows Unit für den direkten Zugriff auf das Win32 API befindet, abstrahiert in separate Schnittstellen, auf welche mit der LCLIntf Unit Zugriff genommen werden kann. Beachten Sie, dass Lazarus nicht win32 emuliert, so dass mehrere Funktionen fehlen und einige nicht wie ihre win32-Gegenstücke funktionieren. Diese Funktionen existieren nur für die Delphi-Kompatibilität und sollten nur für Quick&Dirty-Portierungen benutzt werden. LCL beinhaltet auch viele Typen nicht, so dass oftmals LCLType und manchmal VCLGlobals benötigt werden. LCLProc enthält auch ein paar Funktionen, die hilfreich sein können für maschinennahere Bearbeitung wie "FreeThenNil" wie in Delphi 5 und höher, "DeleteAmpersands" um zusätzliche Et-Zeichen aus Zeichenketten für Kontrollen zu entfernen (vs && etc). Die Interfaces-Unit muss in der .lpr Datei enthalten sein, um das passende Widgetset zu initialisieren.
218	226
219	227		- Messages-\>LMessages
220	228
221	229		TControl-Messages für win32-Ereignis-Callbacks vom Format WM_CALLBACK und die Structs, die dazugehören, finden sich oftmals in der Messages-Unit in Delphi. In LCL befinden diese sich meistens in LMessages, üblicherweise mit einer Namensänderung von WM zu LM, zum Beispiel WM_MOUSEENTER wird LM_MOUSEENTER, und TWMMouse wird TLMMouse.
222	230
223	231		- Graphics, Controls-\>GraphTypes, GraphMath, Graphics, Controls
224	232
225	233		Um einige Sachen zu vereinfachen und die Komplexität von Kreisabhängigkeiten zwischen Units zu verringern, wurden einige Typen in einer gemeinsamen Unit namens GraphType abstrahiert, die sich in Delphi in Graphics oder Controls befinden, bspw. das bvNone usw. von Panels. Deswegen müssen Sie diese Unit gelegentlich einbinden. Eine weitere Unit, leider inkompatibel zu Delphi, liefert zusätzliche Funktionalität, GraphMath. Sie ermöglicht TFloatPoints für präzise Berechnungen, verschiedene Routinen für den Umgang mit Beziers, Linien und Kreisbögen, sowie überladene Operatoren zur Benutzung mit TPoints und TRect, um Punkte derart zu addieren Point1 := Point2 + Point3 oder Rechtecke zu vergleichen if(rect1 = rect2) then ...
226	234
227	235		- Mask-\>MaskEdit
228	236
229	237		Aus Überlegungen für eine bessere Benennung wurde die Unit für TMaskEdit \[MaskEdit \\|\] anstelle des leicht unklareren Mask wie in vielen Delphi Versionen.
230	238
231	239		- StdCtrls-\>StdCtrls,Buttons
232	240
233	241		In vielen Delphi Versionen befindet sich TButton in StdCtrls, während TSpeedButton und TBitBtn sich in Buttons befinden. Für eine Stetigkeit und Einfachheit steckt die LCL alle Buttontypen in Buttons, was gelegentlich die Code-Konvertierung ins Leere laufen lassen kann -- es ist also eine gute Idee, diese einzubinden.
234	242
235	243		#### Eigenschaften und Methoden Unterschiede Delphi -\> FPC/LCL
236	244
237	245		- TBitmap verfügt über eine Kanvas in der LCL
238	246
239	247		#### Semantische Unterschiede
240	248
241	249		##### Reihenfolge der Parameter-Auswertung
242	250
243	251		Delphi stellt sicher, dass alle Parameter von links nach rechts ausgewertet werden. FPC macht dies nicht so, sondern wertet alle Parameter so aus, dass der Code optimal schnell läuft.
244	252
245	253		##### Verschachtelte Prozeduren/Funktionen als Prozedurvariablen
246	254
247	255		Delphi übergibt einen Pointer des aufrufenden Prozesses immer an den Stack, dieser entfernt ihn später auch wieder. Das bedeutet, dass es möglich ist, diesen Pointer auch an eine andere Funktion zu übergeben, die dann das rufenden Programm aufruft, wie jede andere Funktion auch. Das geht natürlich nur, solange man die Variablen der Prozedur nicht benötigt.
248	256
249	257		Im Gegensatz dazu übergibt in FPC das rufende Programm den Pointer als ein verstecktes Argument entsprechend der jeweiligen Calling-Konvention. Das bedeutet, dass bei der Übergabe dieses Stacks an ein anderes Programm alle Parameter um eine Position verschoben sind.
250	258
251	259		Kurz gesagt: Vermeiden Sie es, prozedurale Variablen an andere Prozeduren zu übergeben.
252	260
253	261		#### Syntax Unterschiede
254	262
255	263		Bitte fügen Sie weitere Informationen zu diesem Thema hinzu!
256	264
257	265		Wegen der inhärenten Striktheit des FPC sind manche Syntaxänderungen notwendig, obwohl
258	266
259	267		{\$Mode Delphi}
260	268
261	269		mehr Nachlässigkeit als in Delphi erlaubt. Aus diesem Grund ist es in höchstem Maße empfehlenswert, soweit wie möglich den Syntaxregeln von
262	270
263	271		{\$Mode ObjFPC}
264	272
265	273		zu entsprechen, auch wenn die Codebasis weiterhin von Delphi und LCL gemeinsam benutzt wird. Einiges davon entspricht einfach besserer Code-Praxis, anderes liegt an dem gelegentlich inakuraten Delphi-Modus und manchmal funktioniert Code von Delphi mit FPC nicht so wie erwartet, auch wenn er sich kompilieren lässt. Letztlich sollte die folgende Liste als verbindlich betrachtet werden, auch wenn nicht alle Änderungen zwingend notwendig sind:
266	274
267	275		##### Bei der Zuweisung eines Ereignis-Handler-Einstiegspunkts ist diesem ein "@" voranstellen
268	276
269	277		Zum Beispiel, wenn Sie einen Button-Callback manuell zuweisen
270	278
271	279		Delphi
272	280
273	281		FPC
274	282
275	283		begin
276	284
277	285		if not
278	286
279	287		Assigned(MyButton.OnClick)
280	288
281	289		then
282	290
283	291		` MyButton.OnClick:= SomeFunction; `
284	292
285	293		//@ wird nicht benötigt
286	294
287	295		//weiterer Code...
288	296
289	297		end
290	298
291	299		;
292	300
293	301		begin
294	302
295	303		if not
296	304
297	305		Assigned(MyButton.OnClick)
298	306
299	307		then
300	308
301	309		` MyButton.OnClick:= @SomeFunction; `
302	310
303	311		//@ wird benötigt
304	312
305	313		//weiterer Code...
306	314
307	315		end
308	316
309	317		;
310	318
311	319		Hinweis: Bei Fehlern gibt der Compiler einen Typ-Fehler aus (siehe Hinweis im nächsten Abschnitt).
312	320
313	321		##### Wenn Sie eine Prozedurenvariable aufrufen, verwenden Sie diese Syntax: theprocname()
314	322
315	323		In Delphi gibt es keinen Unterschied zwischen dem Ergebnis einer Funktion und einer Variablen, jedoch gibt es in FPC einen. Um eine Funktion aufzurufen, selbst wenn sie keine Parameter hat, müssen Sie eine runde Klammer anhängen. Zum Beispiel -
316	324
317	325		Delphi
318	326
319	327		FPC
320	328
321	329		With
322	330
323	331		(SomeObject)
324	332
325	333		do begin
326	334
327	335		If
328	336
329	337		Assigned(OnMyCallback)
330	338
331	339		then
332	340
333	341		` OnMyCallback; `
334	342
335	343		//runde Klammer nicht benötigt
336	344
337	345		end
338	346
339	347		;
340	348
341	349		With
342	350
343	351		(SomeObject)
344	352
345	353		do begin
346	354
347	355		If
348	356
349	357		Assigned(OnMyCallback)
350	358
351	359		then
352	360
353	361		` OnMyCallback(); `
354	362
355	363		//runde Klammer benötigt
356	364
357	365		end
358	366
359	367		;
360	368
361	369		Hinweis: Falls nicht im Delphi oder TP Modus, und die Klammern werden vergessen, so gibt der Compiler einen Typ-Fehler aus. Zum Beispiel
362	370
363	371		Error: Incompatible types: got "\<procedure variable type of function:SmallInt;Register\>" expected "SmallInt"
364	372
365	373		Diese Fehlermeldung ist hier zwar wenig aussagekräftig aber logisch.
366	374
367	375		##### Beim Zugriff auf den Wert eines Record mittels eines Zeigers muss dieser zuerst dereferenziert werden
368	376
369	377		In Delphi ist es nicht nötig, einen Zeiger auf einen Record zu dereferenzieren, um auf einen Wert darin zuzugreifen. Tatsächlich kann ein Zeiger wie der Record selbst oder wie jedes andere Objekt behandelt werden. In FPC muss er zuerst dereferenziert werden. Beispiel:
370	378
371	379		Delphi
372	380
373	381		FPC
374	382
375	383		Function
376	384
377	385		GetSomeValue(ARecord: PMyRecord)
378	386
379	387
380	388		Integer;
381	389
382	390		begin
383	391
384	392		If
385	393
386	394		Assigned(ARecord)
387	395
388	396		then
389	397
390	398		` Result`
391	399
392	400
393	401		=
394	402
395	403		ARecord.SomeValue
396	404
397	405		else
398	406
399	407		` Result:= `
400	408
401	409		0
402	410
403	411		;
404	412
405	413		end
406	414
407	415		;
408	416
409	417		Function
410	418
411	419		GetSomeValue(ARecord: PMyRecord)
412	420
413	421
414	422		Integer;
415	423
416	424		begin
417	425
418	426		If
419	427
420	428		Assigned(ARecord)
421	429
422	430		then
423	431
424	432		` Result`
425	433
426	434
427	435		=
428	436
429	437		ARecord^.SomeValue
430	438
431	439		else
432	440
433	441		` Result:= `
434	442
435	443		0
436	444
437	445		;
438	446
439	447		end
440	448
441	449		;
442	450
443	451		##### Beim Zugriff auf Zeichen einer indizierten Zeichenketten-Eigenschaft eines Objektes muss dieses in runden Klammern stehen
444	452
445	453		Mit Delphi ist es möglich, eine Eigenschaft genauso zu behandeln wie andere Konstanten oder Variablen, z.B. beim direkten Zugriff auf einzelne Zeichen einer Zeichenkette, wogegen das mit FPC nicht immer möglich ist, speziell bei indizierten Eigenschaften. Stattdessen muss die entsprechende Eigenschaft zur besseren Unterscheidung in runden Klammer stehen. Dies mag zwar nicht immer nötig sein, es ist dennoch eine gute Praxis, das so zu machen. Beispiel:
446	454
447	455		Delphi
448	456
449	457		FPC
450	458
451	459		Type
452	460
453	461		TSomeComponent=
454	462
455	463		class
456	464
457	465		(TComponent)
458	466
459	467		//weiterer Code...
460	468
461	469		Published
462	470
463	471		Property
464	472
465	473		MyString:
466	474
467	475		String
468	476
469	477		index
470	478
471	479		3
472	480
473	481		read
474	482
475	483		GetMyString;
476	484
477	485		//weiterer Code...
478	486
479	487		End
480	488
481	489		;
482	490
483	491		var
484	492
485	493		` MyChar`
486	494
487	495
488	496		char;
489	497
490	498		begin
491	499
492	500		If
493	501
494	502		Length(MyString)\>
495	503
496	504		2
497	505
498	506		then
499	507
500	508		//no parenthesis needed
501	509
502	510		` MyChar:= MyString[`
503	511
504	512		3
505	513
506	514		\];
507	515
508	516		//weiterer Code...
509	517
510	518		end
511	519
512	520		;
513	521
514	522		Type
515	523
516	524		TSomeComponent=
517	525
518	526		class
519	527
520	528		(TComponent)
521	529
522	530		//weiterer Code...
523	531
524	532		Published
525	533
526	534		Property
527	535
528	536		MyString:
529	537
530	538		String
531	539
532	540		index
533	541
534	542		3
535	543
536	544		read
537	545
538	546		GetMyString;
539	547
540	548		//weiterer Code...
541	549
542	550		End
543	551
544	552		;
545	553
546	554		var
547	555
548	556		` MyChar`
549	557
550	558
551	559		char;
552	560
553	561		begin
554	562
555	563		If
556	564
557	565		Length(MyString)\>
558	566
559	567		2
560	568
561	569		then
562	570
563	571		//parenthesis sometimes needed
564	572
565	573		` MyChar:= (MyString)[`
566	574
567	575		3
568	576
569	577		\];
570	578
571	579		//weiterer Code...
572	580
573	581		end
574	582
575	583		;
576	584
577	585		##### Sie müssen eine Typumwandlung von Zeigern in den tatsächlichen Typ vornehmen, wird dieser Zeiger mit einer Variablen oder Funktion dieses Typs benutzt
578	586
579	587		In Delphi haben Sie manchmal einen Null-Zeiger-Variable, die ein Objekt repräsentiert. Auch wenn es nach einer gestellten Situation aussieht, ist es gängige Praxis gerade in großen Komponenten-Paketen, um zu viele Kreisreferenzen zwischen Objekten verschiedener Units zu vermeiden. In Delphi ist es möglich, diesen Null-Zeiger einer Funktion zu schicken, die ein Objekt dieses Typs erwartet, ohne sich mit einer Typenumwandlung beschäftigen zu müssen. In FPC muss eine solche Typenumwandlung stattfinden
580	588
581	589		Zum Beispiel -
582	590
583	591		Delphi
584	592
585	593		FPC
586	594
587	595		Unit 1
588	596
589	597		Type
590	598
591	599		TSomeObject=
592	600
593	601		class
594	602
595	603		(TComponent)
596	604
597	605		//weiterer Code...
598	606
599	607		End
600	608
601	609		;
602	610
603	611		Procedure
604	612
605	613		DoSomething(Value: TSomeObject);
606	614
607	615		Function
608	616
609	617		GetSomeObject: TSomeObject;
610	618
611	619		Unit 2
612	620
613	621		Type
614	622
615	623		TSomeComponent=
616	624
617	625		class
618	626
619	627		(TComponent)
620	628
621	629		//weiterer Code...
622	630
623	631		Published
624	632
625	633		` SomeObject: Pointer`
626	634
627	635		;
628	636
629	637		//weiterer Code...
630	638
631	639		End
632	640
633	641		;
634	642
635	643		Application
636	644
637	645		var
638	646
639	647		` MyComponent: TSomeComponent`
640	648
641	649		;
642	650
643	651		begin
644	652
645	653		` MyComponent.SomeObject`
646	654
647	655
648	656		=
649	657
650	658		GetSomeObject;
651	659
652	660		//weiterer Code...
653	661
654	662		` DoSomething(MyComponent.SomeObject)`
655	663
656	664		;
657	665
658	666		end
659	667
660	668		;
661	669
662	670		Unit 1
663	671
664	672		Type
665	673
666	674		TSomeObject=
667	675
668	676		class
669	677
670	678		(TComponent)
671	679
672	680		//weiterer Code...
673	681
674	682		End
675	683
676	684		;
677	685
678	686		Procedure
679	687
680	688		DoSomething(Value: TSomeObject);
681	689
682	690		Function
683	691
684	692		GetSomeObject: TSomeObject;
685	693
686	694		Unit 2
687	695
688	696		Type
689	697
690	698		TSomeComponent=
691	699
692	700		class
693	701
694	702		(TComponent)
695	703
696	704		//weiterer Code...
697	705
698	706		Published
699	707
700	708		` SomeObject: Pointer`
701	709
702	710		;
703	711
704	712		//weiterer Code...
705	713
706	714		End
707	715
708	716		;
709	717
710	718		Application
711	719
712	720		var
713	721
714	722		` MyComponent: TSomeComponent`
715	723
716	724		;
717	725
718	726		begin
719	727
720	728		` MyComponent.SomeObject`
721	729
722	730
723	731		=
724	732
725	733		Pointer(GetSomeObject);
726	734
727	735		//weiterer Code...
728	736
729	737		` DoSomething(TSomeObject(MyComponent.SomeObject))`
730	738
731	739		;
732	740
733	741		end
734	742
735	743		;
736	744
737	745		#### Ressourcen
738	746
739	747		Delphi Ressourcendateien sind Win32-spezifisch und nicht kompatibel mit Lazarus, so dass Sie sie neu erstellen und mit Lazres kompilieren müssen. Lazres ist im lazarus/tools Unterverzeichnis zu finden. Wenn Sie die Lazarus Quellen heruntergeladen haben, müssen sie es erst kompilieren.
740	748
741	749		- cd lazarus/tools
742	750		- make install
743	751
744	752		Um eine Ressource zu Ihrer Anwendung hinzuzufügen:
745	753
746	754		- lazres myresource.lrs mypix.xpm anotherpix.xpm
747	755		- Fügen Sie die LResources Unit zu Ihrem Uses Abschnitt hinzu
748	756		- Nehmen Sie die von Ihnen erstellte .lrs Datei unter dem initialization Abschnitt auf
749	757
750	758		Beispiel:
751	759
752	760		function
753	761
754	762		TForm1.LoadGlyph(
755	763
756	764		const
757	765
758	766		GlyphName:
759	767
760	768		String
761	769
762	770		): TBitMap;
763	771
764	772		begin
765	773
766	774		` Result:= TPixmap.Create`
767	775
768	776		;
769	777
770	778		` Result.LoadFromLazarusResource(GlyphName)`
771	779
772	780		;
773	781
774	782		end
775	783
776	784		;
777	785
778	786		//weiterer Code...
779	787
780	788		begin
781	789
782	790		` Speedbutton1.glyph:= LoadGlyph('mypix')`
783	791
784	792		;
785	793
786	794		//weiterer Code...
787	795
788	796		end
789	797
790	798		;
791	799
792	800		initialization
793	801
794	802		{\$I unit1.lrs}
795	803
796	804		{\$I myresource.lrs}
797	805
798	806		end
799	807
800	808		.
801	809
802	810		### Eine andere Methode um ein Delphi- oder Kylix-Projekt nach Lazarus zu konvertieren
803	811
804	812		- Benennen Sie alle .dfm oder .xfm Dateien in .lfm um. (Dies funktioniert nicht mit frühen Delphi Versionen da sie keine textbasierte .dfm Datei erstellen.)
805	813		- Benennen Sie die .dpr Datei in .lpr um.
806	814		- Nehmen Sie notwendige Änderungen in der .lpr Datei vor:
807	815
808	816		1. Fügen Sie {\$mode delphi}{\$H+} oder {\$mode objfpc}{H+} Direktiven hinzu.
809	817		2. Fügen Sie 'Interfaces' zum uses Abschnitt hinzu.
810	818		3. Kommentieren Sie die {\$R *.res} Direktive aus oder löschen Sie diese.
811	819
812	820		- Nehmen Sie notwendige Änderungen in allen .pas Unit Dateien vor:
813	821
814	822		1. Fügen sie die {\$mode delphi}{\$H+} oder {\$mode objfpc}{H+} Direktiven hinzu.
815	823		2. Fügen Sie 'LResources', und wenn das Formular Buttons hat, 'Buttons' zum uses Abschnitt hinzu.
816	824		3. Kommentieren Sie die {\$R .dfm} oder {\$R .xfm} Direktive aus oder löschen Sie diese.
817	825		4. Fügen Sie einen 'Initialization' Abschnitt am Ende jeder Datei hinzu, und fügen die {\$I unitname.lrs} Direktive darin hinzu.
818	826
819	827		- Wählen Sie Projekt -\> Neues Projekt von Datei
820	828		- Wählen Sie die .lpr Datei
821	829		- Im 'Erzeuge neues Projekt' Fenster wählen Sie 'Anwendung'
822	830		- Erzeugen Sie das Projekt und nehmen Sie weitere notwendige Korrekturen vor um eine ordentliche Kompilierung zu erhalten, an diesem Punkt wird die .lpi Datei automatisch generiert. Sie erhalten vielleicht 'Error reading Form' Meldungen. Klicken Sie auf 'Continue Loading' falls dem so ist.
823	831		- Speichern Sie alles und Sie haben ein Lazarus Projekt :-)
824	832
825	833		## Hilfe erhalten
826	834
827	835		Wenn Sie während der Konvertierung auf ein Problem stoßen, das Sie gerade nicht lösen können, gibt es eine große Auswahl von Orten, um Hilfe zu erhalten:
828	836
829	837		### Dokumentation
830	838
831	839		Für reine Object Pascal und FPC Probleme, ist der beste Ort zu beginnen die Free Pascal [Dokumentation](http://www.freepascal.org/docs-html/)von Michaël Van Canneyt und Florian Klämpfl.
832	840
833	841		Für mehr Lazarus orientierte Probleme ist die Lazarus Projekt Dokumentation in der [[Main Page/de\|Lazarus-CCR Knowledgebase]] der nächste Ort zum Nachschauen. Schließlich können Sie eine Frage posten in einer der [Mailing Listen](http://www.freepascal.org/maillist.html)für den Free Pascal Compiler oder den [FPC Foren](http://community.freepascal.org:10000/bboard/), wo eine Menge Experten eingeschrieben sind.
834	842
835	843		### Unterstützung durch andere User
836	844
837	845		Mailing-Listen: Man kann eine Frage stellen unter einer der [Mailing-Listen für den Freien Pascal Compiler](http://www.freepascal.org/maillist.html) oder das [FPC/Lazarus forums](http://forum.lazarus.freepascal.org/index.php?action=forum) wo eine Reihe von Experten antworten.
838	846
839	847		Bei Zugriff auf IRC: bei irc.freenode.net: [\#fpc](irc://irc.freenode.net/fpc) for FPC, oder [\#lazarus-ide](irc://irc.freenode.net/lazarus-ide) für Lazarus
840	848
841	849		### Wissensbasis
842	850
843	851		Es gibt einige hervorragende Such- und Wissensdatenbanken im Internet, die ebenfalls eine große Hilfe beim Erlernen neuer Techniken und beim Lösen von Problemen sein können:
844	852
845	853		- Tamarack Associates enthält eine schnelle \[ <http://codenewsfast.com/> search\] Suche speziell für das Borland usenet Archiv.
846	854		- Mer Systems Inc. liefert eine ähnliche Suchseite [engine](http://www.mers.com/searchsite.html).
847	855		- Eine weitere herausragende Informationsquelle sowie eine standortübergreifende [search](http://www.efg2.com/Lab/search.htm)Möglichkeit ist Earl F. Glynn's Computer Lab and Reference [Library](http://www.efg2.com/).
848	856
849	857		## Erstellen eines Packages und Veröffentlichung Ihrer Komponente
850	858
851	859		### Erstellen eines Lazarus Packages für Ihre Komponente(n)
852	860
853	861		Das Erstellen eines Packages macht die Installation Ihres konvertierten Codes viel einfacher - besonders wenn Sie mehr als eine Komponente anbieten. Mattias Gärtner hat eine Übersicht über [[Lazarus Packages/de\|Lazarus Packages]] geschrieben, die Sie lesen sollten bevor Sie mit diesem Prozess beginnen.
854	862
855	863		### Dokumentation
856	864
857	865		Der Zweck dieser Seite und des Wiki-Formats ist, die Generierung einer professionellen Dokumentation zu einem einfachen und schnellen Vorgang zu machen. Das Wiki erlaubt es auch, die Resultate Ihrer Posting unverzüglich zu sehen und erlaubt Ihnen, Änderungen in Echtzeit zu machen.
858	866
859	867		Die Verwendung des Lazarus-CCR Wiki um eine schön anzuschauende Dokumentation zu erstellen ist sehr einfach. Wenn Sie noch nie zuvor die Wiki Sprache verwendet haben, können Sie sich in dem [[Sand Box]] Übungsbereich damit vertraut machen.
860	868
861	869		### Erzeugen einer Code Release Page
862	870
863	871		Die Code Release Page enthält grundlegende Informationen über Ihre Komponente, die ein potenzieller Nutzer wird wissen wollen, wie Lizenz, vorgesehene Plattform, Status (alpha, beta, stable...), wo sie herunterzuladen ist, wer sie geschrieben hat, ob Support verfügbar ist... etc.
864	872
865	873		Die folgende Prozedur lässt Sie eine Code Release Seite mit Ihrem Browser erzeugen:
866	874
867	875		- Gehen Sie zu [[Release new component]]
868	876		- Tippen Sie den Namen Ihrer Komponente in die Textbox und klicken auf Create Article
869	877		- Füllen Sie die Vorlage aus und vergessen Sie nicht zu speichern.
870	878		- Bearbeiten Sie die [[Components and Code examples]] Seite und fügen Sie einen Link zu Ihrer gerade erzeugten Seite hinzu im "Released Components" Abschnitt. Speichern Sie die geänderte Seite.
871	879
872	880		### Einreichen der Komponente
873	881
874	882		Wenn Sie die Rechte eines Lazarus-Release-Verwalters besitzen, laden Sie ihre Komponente in das SourceForge File Release System hoch und fügen Sie sie zur Liste der Release-Packages hinzu. Andernfalls senden Sie die Komponente an einen der Projektadministratoren (Tom Lisjac oder Vincent Snijders) und wir werden sie zum Repository hinzufügen. Bevor wir sie zu SourceForge hochladen, müssen Sie eine Code Release Page erstellen, um Ihre Komponente zu beschreiben. Sie können die [[Release new component]] Seite verwenden, um mit der Erzeugung einer solchen Seite zu beginnen.
875	883
876	884		Falls Sie vorhaben, dass Sie die Entwicklung der Komponente fortsetzen, dann können wir sie auch in SVN einstellen, sodass Sie auch weiterhin Zugriff auf Ihre Komponente haben. Wenn wir es leid sind, immer Ihre Patches zu übermitteln, werden wir Ihnen die Schreibrechte zum SVN einräumen, damit Sie Ihre Patches dann selbst betreuen können. Für Details siehe [[Using the Lazarus-ccr SVN repository]].
877	885
878	886		## Mitwirkende und Änderungen
879	887
880	888		Diese Seite wurde von der epikwiki [Version](http://lazarus-ccr.sourceforge.net/index.php?wiki=CodeConversionGuide) konvertiert.
881	889
882	890		- Anfangsversion von Tom Lisjac und Mattias Gärtner - 9/22/2003 VlxAdmin
883	891		- Moved Getting help from the main page. T. Lisjac - 9/24/2003 VlxAdmin
884	892		- Added documentation templates, procedure and links. 9/25/2003 VlxAdmin
885	893		- LCLLinux wurde in LCLIntf umbenannt, Jesus Reyes, 9/27/2003
886	894		- added more information on Unit changes, [AndrewJohnson](http://lazarus-ccr.sourceforge.net/index.php?wiki=AndrewJohnson) 9/27/2003
887	895		- Updated Syntax differences, including some examples, [AndrewJohnson](http://lazarus-ccr.sourceforge.net/index.php?wiki=AndrewJohnson) 9/27/2003
888	896		- FPC 1.0.x doesn't support interfaces, Vincent Snijders 9/28/2003
889	897		- Fixed some of the examples per new WikiWord definition, 9/28/2003 VlxAdmin
890	898		- Made code more consistant to remove last accidental Pascal WikiWord definitions, [AndrewJohnson](http://lazarus-ccr.sourceforge.net/index.php?wiki=AndrewJohnson) 9/27/2003
891	899		- Use tables for code examples for nice blocks, and easy side by side view of Delphi-\>FPC differences, [AndrewJohnson](http://lazarus-ccr.sourceforge.net/index.php?wiki=AndrewJohnson) 10/17/2003
892	900		- Use pascal stylesheet to make example code more readable, [AndrewJohnson](http://lazarus-ccr.sourceforge.net/index.php?wiki=AndrewJohnson) 10/18/2003
893	901		- Abschnitt 'Another method to convert a Delphi or Kylix project to Lazarus' hinzugefügt , George Lober, 2/17/2006
894	902
895	903		---
896	904		From the Free Pascal wiki, page "Code Conversion Guide/de", as it stood on 2023-03-15 after a change by Kornelius, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).

Back to history