Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#11

Re: Assignfile- einfaches "Laden" und "Speich

  Alt 24. Okt 2006, 08:27
Korrigierte Version:
Delphi-Quellcode:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
var
  aIniFile : TIniFile;
begin
  aIniFile := TIniFile.Create(ExtractFilePath(Application.ExeName) + 'Edit1Content.ini');
  try
    aIniFile.WriteString('Sektionsname', 'Edit1.Text', Edit1.Text);
  finally
    aIniFile.Free;
  end;
end;
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat