Thema: Delphi Frage zu IniFile

Einzelnen Beitrag anzeigen

hoika

Registriert seit: 5. Jul 2006
Ort: Magdeburg
8.275 Beiträge
 
Delphi 10.4 Sydney
 
#9

Re: Frage zu IniFile

  Alt 28. Jan 2010, 10:43
Hallo,

Zitat:
aber man will nur 3 edits in der ini speichern
Wenn du nur 3 Edits reinschreiben willst,
warum nimmst du dann nicht 3 WriteString's,
statt dich mühselig durch alle Komponenten zu hangeln ?

Wenn es denn unbedingt sein soll,
packe die 3 Edit-Namen in eine StringList und vergleiche den aktuellen Edit.Name
ähnlich wie in #8.

Aber ich würde das etwas anders machen

Delphi-Quellcode:
var
  Edit: TEdit;
  StrList: TStringList;
begin
  StrList:= TStringList.Create; // try finally selber einfügen ...
  StrList.Add('Edit1');
  StrList.Add('Edit5');
 

  ..

  if Components[i] is TEdit then
  begin
    Edit:= TEdit(Components[i]);
    if StrList.IndexOf(Edit.Name)<>-1 then
    begin
      Ini. WriteString ...
    end;

...
  StrList.Free;

end;

Warum so umständlich ?
Neu zu speichernde Editoren können einfach per StrList.Add eingefügt werden,
an genau einer Stelle.

Der Code bei if Components[i] is TEdit then
sorgt dafür, dass du dort auch mal einen Breakpoint setzen kannst,
wenn etwas nicht klappt. Du hast dann sofort den Edit.Name.


Heiko
Heiko
  Mit Zitat antworten Zitat