Registriert seit: 31. Okt 2004
Ort: Bremerhaven
355 Beiträge
Delphi XE7 Professional
|
AW: [gelöst] Lazarus: SaveToFile geht nicht
17. Feb 2015, 16:53
Moin,
Leg die Defintion von sl in die Typdeklaration der Form.
Delphi-Quellcode:
TForm1 = class(TForm)
private
{ private declarations }
sl: TStringList;
public
{ public declarations }
end;
Dann ist sie in der gesamten Form sichtbar, aber vor unbeabsichtigten Änderungen von ausserhalb geschützt.
Stell Dir einfach einmal vor, was geschiet, wenn Du diese Form zweimal erstellst, oder wenn irgend ein Komponentenentwickler auf die glorreiche Idee kommt, eine globale Variable mit dem Namen "sl" anzulegen.
Und wieder was gelernt. Danke, habe das gleich umgesetzt.
Gruß Heiko
OS: Windows 10 Professional, Delphi XE7 Pro SP1 +(Mobilpack & FireDAC)
|
|
Zitat
|