Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi mehrere edit.text felder speichern (https://www.delphipraxis.net/8940-mehrere-edit-text-felder-speichern.html)

Wadim 15. Sep 2003 17:28


mehrere edit.text felder speichern
 
hi,

wie kann ich mehrer edit.text felder z.b in eine *.txt datei speicher- hab nur ein memo feld hingekriegt zu speicher- aber editfalder davon hab ich keine ahnung- kann mir einer helfen?

danke

fkerber 15. Sep 2003 18:41

Re: mehrere edit.text felder speichern
 
Hi!

Wenn du mehrere Edit-Felder in eine Datei speichern willst, dann geht das glaub ich nur, wenn du es vorher in ein Memo kopierst und das dann speicherst!
Verbessert mich, wenn ich mich irre!

ciao fkerber

Alexander 15. Sep 2003 18:52

Re: mehrere edit.text felder speichern
 
:shock: *verbesser*
Du kannst das etweder in eine INI-Datei machen, ist ja nichts anders als eine TXT-DAtei.
Oder du kuckst dir mal die Befehle: AssignFile, Writeln etc. an.
Hier lassen sich bestimmt auch einige Bsp. finden...;-)

Wadim 15. Sep 2003 19:35

Re: mehrere edit.text felder speichern
 
Zitat:

Zitat von alexander
:shock: *verbesser*
Du kannst das etweder in eine INI-Datei machen, ist ja nichts anders als eine TXT-DAtei.
Oder du kuckst dir mal die Befehle: AssignFile, Writeln etc. an.
Hier lassen sich bestimmt auch einige Bsp. finden...;-)

kannst du es mir einmal zeigen? - werd mich dann ca. 21uhr bei dir über icq melden- natürlich auch nur wenn du ja sagst

Nalincah 15. Sep 2003 19:45

Re: mehrere edit.text felder speichern
 
Probiers doch mal mit ner StringList.Dann mit ner for-schleife die von 0 bis Anzahl der Edits läuft. Das ist eleganter als ein Memo.

Nalincah 15. Sep 2003 19:56

Re: mehrere edit.text felder speichern
 
Delphi-Quellcode:
var
T:Strings;
i:integer;
begin
  T := TStringList.Create;
  try
    for i := 0 to 5 (Anzahl der Edits -1) do
    begin
      T.Add(Edit[i].text);
    end;
    T.SaveToFile('Datei.txt');
  finally
    T.Free;
  end;
end;
Hoffe das war richtig und das was du brauchst.Habs nicht getestet

Nalincah 15. Sep 2003 20:01

Re: mehrere edit.text felder speichern
 
Klappt nicht...Mist

Nalincah 15. Sep 2003 20:04

Re: mehrere edit.text felder speichern
 
So klappts:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
T:TStrings;
i,j:integer;
begin
  T := TStringList.Create;
  try
    for i := 0 to Form1.ComponentCount - 1 do
    begin
      if Form1.Components[i].ClassType = TEdit then
        T.Add(TEdit(Form1.Components[i]).Text);
    end;
    T.SaveToFile('c:\Datei.txt');
  finally
    T.Free;
  end;
end;

CalganX 15. Sep 2003 20:06

Re: mehrere edit.text felder speichern
 
Hi,
warum sowas mit einer Stringlist erledigen? Sorry, aber das verbraucht nur Speicher. Die Möglichkeit mit TextFile, die alexander angemerkt hat, ist wesentlich speichersparender!

Chris


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:55 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz