Entwickler-Ecke
Dateizugriff - edit feld auslesen und in .txt schreiben
crossit - So 13.12.09 14:56
Titel: edit feld auslesen und in .txt schreiben
hallo liebe delphier,
habe folgendes problem wo ich nicht mehr weiter komme
unzwar habe ich mehrere edit felder welche ausgelesen werden sollen und dann in einer textdatei gespeichert werden sollen und dazu noch hochgeladen werden auf einen ftp server.
nun meine frage wie mche ich das mit dem auslesen?war natürlich nicht faul und habe selbst ein wenig rumprobiert jedoch scheiterte ich immer...
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| var
Liste : TStringlist ;
begin
Liste:=TStringList.Create;
Liste.Add('vorname:'+ vorname.text);
Liste.Add('Nachname:'+ nachname.text);
liste.Add('Datum:' + datum.text);
Liste.Add(' ')
Liste.Add('Übung:'+ putten.text);
Liste.Add(' ')
Liste.Add('1 Meter :' + treffer.text + '/' + 'insgesamt1.text);
...;
Liste.SaveToFile(putten_datei);
Liste.Free;
end; |
jedoch bekomme ich immer den fehler , dass er die edit felder nicht deklariert sind aber warum?
das mit den meter geht von 1 meter bis 3 meter nur zu info*
klezmor - So 13.12.09 15:01
Könnte es sein, dass du nur den Text deiner Editfelder geändert hast und nicht den namen des Objektes an sich?
Dude566 - So 13.12.09 15:05
Das hätte ich jetzt auch vermutet, dass es trotzdem Edit1 statt Vorname und Edit2 statt Nachname ist.
crossit - So 13.12.09 15:25
nene darauf habe ich geachtet^^ aber meine frage ist eher wie der code lauten müsste das es alles so klappt wie es soll
Gausi - So 13.12.09 15:28
Ist deine Prozedur, die du oben gepostet hast, eine Methode der Form, oder steht sie so alleine da?
Also steht da sowas procedure SpeichereListe; oder sowas procedure TMainForm.SpeichereListe;? Denn letzteres wäre richtig - muss dann natürlich auch in der Deklaration von MainForm oben eingefügt werden.
crossit - So 13.12.09 15:56
sie steht einfach so da
Gausi - So 13.12.09 16:11
Dann änder das mal. ;-)
ffgorcky - So 13.12.09 16:22
Also musst Du dann nur diese Prozedur noch in Deiner Form als
public dekalrieren:
Delphi-Quelltext
1:
2:
3:
4:
5:
| ...
public
procedure SpeichereListe();
end;
... |
Und dann natürlich auch bei Deiner Procedure den Form-Namen vorwegschreiben:
Delphi-Quelltext
1:
2:
3:
4:
| procedure TFormWieAuchImmerDuSieNennst.SpeichereListe();
begin
...
end; |
Damit müsste das gehen.
crossit - So 13.12.09 16:34
erledigt und code sieht zur zeit so aus
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
| procedure tform1.putten_text;
var
Liste : TStringlist ;
begin
Liste:=TStringList.Create;
Liste.Add('vorname:'+ vorname.text);
Liste.Add('Nachname:'+ nachname.text);
liste.Add('Datum:' + spskinedit4.text);
Liste.Add(' ');
Liste.Add('Übung: kurzes und langes Putten' );
Liste.Add(' ');
Liste.Add(' kurzes Putten :');
Liste.Add('1,0 Meter: ' + M1.text+ '/' + M1G.text );
Liste.Add('1,5 Meter: ' + M15.text+ '/' + M15G.text );
Liste.Add('2,0 Meter: ' + M2.text+ '/' + M2G.text );
Liste.Add('2,5 Meter: ' + M25.text+ '/' + M25G.text );
Liste.Add('3,0 Meter: ' + M3.text+ '/' + M3G.text );
Liste.Add(' ');
Liste.Add('Langes Putten:');
Liste.Add(' ');
Liste.Add('5,0 Meter: ' + M5.text+ '/' + M5G.text );
Liste.Add('8,0 Meter: ' + M8.text+ '/' + M8G.text );
Liste.Add('10,0 Meter: ' + M10.text+ '/' + M10G.text );
Liste.Add('13,0 Meter: ' + M13.text+ '/' + M13G.text );
Liste.Add('15,0 Meter: ' + M150.text+ '/' + M150G.text );
Liste.SaveToFile('putten.txt');
Liste.Free; |
Delphi-Quelltext
1:
2:
3:
4:
| procedure TForm1.PuttuploadClick(Sender: TObject);
begin
putten_text;
end; |
jetzt kommt nur noch das hochladen dazu
frage : wie soll ich die datei hochladen? über idftp.put oder gibs da eine sichere variante? achja dann muss ich nochn paar ordner aufm ftpserver erstellen und in die einzelnen wechseln lassen code kommt gleich
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!