Datei laden

[eleonora]

Huhu!

:D Ich hab mal wieder ein Problem!

Und zwar möchte ich eine Datei laden, ohne das sich das Fenster vom OpenDialog öffnet.
Der Benutzer weiss nicht wie die Datei heisst und sollte deshalb nur mit einem Mausklick auf einem Button, die Datei ändern können und anschliesend speichern!
Wisst Ihr was ich meine? :?:

Gruss Eleonora

[Jens Schumann]

Hallo,

Zitat:

Zitat von eleonora

Wisst Ihr was ich meine?

eigentlich nicht.

Es stellen folgende sich Fragen:
1. Welches Format hat die Datei?
2. Mit welcher Komponente soll der Dateiinhalt angezeigt werden?

Bei einer TXT-Datei würde ich den Inhalt in einem Memo anzeigen.

Textdatei ins Memo laden: Memo1.Lines.LoadFromFile(Pfad+Dateiname)
Textdatei speichern : Memo1.Lines.SaveToFile(Pfad+Dateiname)

[sharkx]

huhu :>

Nehmen wir an du möchtest eine txt Datei in ein memo laden.

Code:

procedure TForm1.Button1Click(Sender: TObject);
begin
Memo1.Lines.LoadFromFile('c:blah/blub/grml.txt');
end;

[Phoenix]

Du könntest z.B. bei einer Textdatei im OnClick - Ereignis des Buttons eine StringList mit LoadFromFile('Dateiname') die Datei öffnen und nachher beim OnClick des zweiten Buttons mit SaveToFile('Dateiname') die Datei wieder abspeichern.


Edit: Tja, da war SharkX schneller im Tippen. :)

[eleonora]

Danke schon mal für Eure Hilfe, aber all das habe ich schon probiert! Und es ist nicht das was ich brauche/suche!

Ich werde versuchen es anders zu beschreiben!

Momentan lade und ändere ich die Datei in ein Memofeld welches sich auf einer zweiten Unit befindet! Bevor man ändern und laden kann, frage ich auf der ersten Unit mit einem MessegDlg ab, ob man diese Datei auch wirklich ändern möchte?! Wenn ja, dann öffnet sich die zweite Unit und man kann die Datei dann laden, ändern und wieder speichern!

Ich möchte aber beim "ja"Click die automatische Änderung dieser Datei, ohne das sich das Fenster vom OpenDialog und die zweite Unit erst öffnet! Denn die Benutzer wissen in dem Moment ja nicht welche Datei zum ändern wäre! Und jedes mal mit einem MessageDlg drauf Hinweisen wie sie vorgehen sollen, möchte ich auch nicht!

Ich hoffe jetzt ist es verständlicher?

Gruss Eleonora

[sharkx]

Code:

LoadFromFile('path/datei')

wo is da bitteschön nen opendialog ?

[eleonora]

@sharkx:
Das mit dem OpenDialog hat doch gar nicht Dir gegolten. Ich habe alles nur mal so beschrieben wie ich es momentan mache, weil es weiter oben angefordert worden ist!

Aber deswegen funktioniert Dein Vorschlag trotzdem nicht! Ich habe es ja so schon vorher versucht gehabt! Wenn ich das so mache, dann bringt er mir eine Fehlermeldung!

eleonora

[Darty]

:) Ich glaube um welche Fehlermeldung es handelt würde jedem interessieren der helfen will :)

[sharkx]

Paste mal bitte die Procedur wo du die Datei laden möchtest. Vieleicht hattest du nur beim loadFromFile den dateinamen falsch geschrieben? an falsche stelle gestezt oder ähnliches ;)

[blq]

wenn ich dein Problem richtig verstanden habe, willst du wenn der User auf Ja klickt, dass deine Datei gespeichert wird ! - Oder

wenn dem so ist
die MessageDlg liefert doch returnvalues zurück, die du abfangen kannst...

procedure TForm1.Button1Click(Sender: TObject);

begin
if MessageDlg(Wollen Sie speichern. ',
mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes then
begin
loadfromfile.....
end;

end;

wenn das nicht dein problem war... dann vergess mein posting