Forum: Programmieren allgemein
Delphi
by Sataan93,
8. Jun 2011
ach ich gebs auf -.-
danke für eure Hilfe... ^^
das Programm geht garnichmehr ich lass es bleiben.
Soll mein lehrer mal drüber gucken, ich mach es nichmehr! ich bin keine Kämofernatur :P
Forum: Programmieren allgemein
Delphi
by Sataan93,
8. Jun 2011
So ich hab es jetzt erstmal so umgestellt:
procedure TForm1.BtSpeichernClick(Sender: TObject);
var
Textdatei: textfile;
z:integer;
begin
if savedialog1.Execute=true then
begin
assignfile(Textdatei,savedialog1.FileName);
Forum: Programmieren allgemein
Delphi
by Sataan93,
7. Jun 2011
Also ich hab das problem, dass der mir die zeilen im String nicht so speichert wie sie gespeichert werden müssen: statt Name;Vorname;Adresse;
Name;Vorname;Adresse; macht es
Vorname;Adresse;Name;Vorname;Adresse..
procedure TForm1.BtSpeichernClick(Sender: TObject);
var
Textdatei: textfile;
i,j: integer;
begin