.txt datei in memo laden

[schoenwetterflieger]

moin ihrs!

hab fast das ganze forum duchsucht aber kien algorithmus gefunden, der die datei von edit1.text in einemMemo feld öffnet

d.h.:

eine datei namens 001.txt soll in das Memo feld geladen werden. das prob dabei, im edit1.text soll nur 001 eingegeben werden und mit einem buttosoll die datei 001.txt in das memo feld geladen werden!!

bitte helfen!!
thanks!!


mfg schoenwetterflieger

[dahead]

Dafür gibt es Memo1.Lines.LoadFromFile(Edit1.Text + '.txt');

edit: man sollte vorher natürlich noch das akt. verzeichnis prüfen, bzw. mitangeben (vor das Edit1.Text). Außerdem sollte sicher sein, dass die Datei überhaupt existiert (if FileExists() then).

edit2: hatte das ".lines" vergessen, ergänzt.

[dfried]

Nichts leichter als das :)

In deinem onButtonClick machst du folgendes:

Delphi-Quellcode:

var FName : String;
begin
  FName := Format('%s.txt',[edit1.Text]);
  If FileExists(FName) then
    Memo.Lines.LoadFromFile(FName)
  else
    ShowMessage('Datei nicht vorhanden: '+FName);
end;

ggf. brauchst du auch noch einen Verzeichnisnamen...

[Martin K]

Warum verwendest du nicht einfach einen OpenDialog ?
Den gibt's unter "Dialoge".

Dann schreibst du in das OnClick-Ereignis eines Buttons einfach folgendes:

Delphi-Quellcode:

If OpenDialog1.Execute then
  Memo1.Lines.LoadFromFile(OpenDialog1.FileName);

Da brauchst du dann auch nicht mehr das Verzeichnis zu überprüfen.
Und wenn du bei dem OpenDialog unter Options "ofFileMustExist" auf True setzt, dann brauchst du auch nicht mehr zu überprüfen, ob die Datei existiert.

[Hador]

Naja wenn man 'n bisschen mehr gesucht hätte, hätte man schon etwas gefunden.
Z.B. das Delphi Anfänger Tutorial von Nils_13: Link, was du ja mal durcharbeiten könntest.
Dort wird vorallem der Gebrauch von Komponenten erklärt.
Ich denke mal das könmnte dir helfen (Auch wenn ich das Tutorial für einen kompletten Anfänger eher ungeeignet halte - Aber es scheint ja so, dass du einige Vorkenntnisse besitzt)

[schoenwetterflieger]

@dfried

das sihet ja ganz gut aus aber nach ...[edit1.text]) kommt ne fehlermeldung:
Inkompatible Typen: 'Integer' und 'TCaption'

was nun??

[schoenwetterflieger]

sorry fehler gefunden!! Komma vergessen


DANKE @ ALL