| Autor |
Beitrag |
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 15:23
Hallo und erstmal Entschuldigung das ich das Thema bestimmt wieder in nem falschen Topic gepostet habe!
Wie das mit dem Speichern in eine Vordefinierte Datei geht habe ich schon mitbekommen, aber ich würde das gerne so lösen, wie wenn man z.B bei dem Internetexplorer ein Bild speichert, das sich so ein extra Fenster öffnet, wo man seine Ordner sieht und dann dort auch den Dateinamen frei wählen kann.
Ich habe das in dem Forum schonmal gesucht, aber bis auf die vordefienierten Geschichten habe ich leider nix gefunden!
Bitte kann ein netter Nachhilfelehrer, mir dem voll Unerfahrenem helfen? Danke vielmals
|
|
Elite
Ehemaliges Mitglied
Erhaltene Danke: 1
|
Verfasst: Fr 04.02.05 15:25
Du hast ne Komponente, die sich TSaveDialog nennt.
Im Forum gibts massig Infos dazu:  SAVEDIALOG
|
|
Radioactive
Beiträge: 179
Win 98, Win XP Home SP2
D3 Prof, D7 Pers, D2005 Pers
|
Verfasst: Fr 04.02.05 15:25
Mach es doch mit einem SaveDialog. Also so:
  Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
| var Text: TStringList;
if Savedialog1.Execute then
begin
Text.SaveToFile(SaveDialog1.Filename);
end; | _________________ Radioactive
"Wer scrollt, verliert!" Matthias Stein, Informatiklehrer am GG
|
|
Gesus 
Beiträge: 43
|
Verfasst: Fr 04.02.05 15:32
Savedialog1 erkennt der bei mir Leider nicht.
(Tut mir Leid, ich bin wirklich noch Neuling)
|
|
Radioactive
Beiträge: 179
Win 98, Win XP Home SP2
D3 Prof, D7 Pers, D2005 Pers
|
Verfasst: Fr 04.02.05 15:34
Füge einfach die Komponente SaveDialog in dein Formular ein (die findest du bei den Kompos unter Dialoge). Dann wird automatisch ein Objekt SaveDialog1 angelegt.
_________________ Radioactive
"Wer scrollt, verliert!" Matthias Stein, Informatiklehrer am GG
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 15:48
Danke, und eine Vordefinierte Dateiendung?
|
|
AXMD
Beiträge: 4006
Erhaltene Danke: 7
Windows 10 64 bit
C# (Visual Studio 2019 Express)
|
Verfasst: Fr 04.02.05 15:49
Verusch mal DefaultExt-Property
AXMD
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 15:52
nope, das geht nicht 
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 15:58
Danke, habe es selbst hinbekommen!
Delphi-Quelltext
1:
2:
3:
| if Savedialog1.Execute then begin
Stl1.SaveToFile(SaveDialog1.FileName+'.txt');
end; |
Danke an alle die so schnell geholfen haben! Ihr seid spitze! 
Edit: Noch besser wenn die Dateiendung in Filter eingetragen wird, da kann dann der User noch auswählen!
Nochmal thx
|
|
Grendel
Beiträge: 443
Gentoo Linux, MacOS X, Win 2000
D5 Ent, D7 Ent, Lazarus, Anjuta, MonoDevelop
|
Verfasst: Fr 04.02.05 16:17
| Gesus hat folgendes geschrieben: | | Edit: Noch besser wenn die Dateiendung in Filter eingetragen wird, da kann dann der User noch auswählen! |
Dann guck Dir, wie AXMD bereits sagte, die Eigenschaft "DefaultExt" des Dialogs an.
Bis neulich ...
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 16:22
DefaultExt sagte mir aber nix 
|
|
UGrohne
Beiträge: 5502
Erhaltene Danke: 220
Windows 8 , Server 2012
D7 Pro, VS.NET 2012 (C#)
|
Verfasst: Fr 04.02.05 16:28
| Gesus hat folgendes geschrieben: | | DefaultExt sagte mir aber nix |
Er meinte die Eigescnahft DefaultExt der Komponente SaveDialog. Diese findest Du im Objektinspektor. Und wenn Du schon nicht weißt, was etwas sein soll, dann frag doch besser nach und sag nicht nur, dass es nicht gehen würde ...
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 16:43
Ich habe diese Eigentschaft ja auch gefunden, aber wenn ich da etwas hineingeschrieben habe, ist es nicht gegangen. Was anderes habe ich doch gar nicht gesagt
|
|
UGrohne
Beiträge: 5502
Erhaltene Danke: 220
Windows 8 , Server 2012
D7 Pro, VS.NET 2012 (C#)
|
Verfasst: Fr 04.02.05 17:00
Was genau ist denn dann nicht gegangen? Sag z.B. auch mal. was Du hineingeschrieben hast.
Im Zweifelsfall hilft hier auch die Hilfe, einfach auf die Eigenschaft klicken und F1 drücken.
Deine Lösung hat eben den nachteil, dass immer eine Extension angehängt wird, auch wenn schon eine drinsteht.
|
|
Gesus
Beiträge: 43
|
Verfasst: Fr 04.02.05 17:35
Also ich habe bei DefaultExt einfach mal txt eingegeben, und es passierte einfach nichts.
Aber als ich bei Filter txt eingegeben habe, konnte ich dann auch noch ne Beschreibung eintragen und weitere Dateiendungen sortiert in einer Tabelle und das funktionierte! (Ich habe Delphi 7)
|
|
toxicmaster
Beiträge: 94
|
Verfasst: Sa 05.02.05 21:16
hi,
ich habe ein ähnliches problem.
also ich will per opendialog und save dialog den text aus einem memofeld speichern und auch laden können.
das ganze soll in eine textdatei gespeichrt und von dort auch wieder geladen werden können.
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
| procedure TForm1.Button1Click(Sender: TObject);
var Text: TStringList;
filename:string;
begin
if Savedialog1.Execute then begin
text.SaveToFile(SaveDialog1.FileName+'.txt');
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
var filename:string;
begin
if opendialog1.Execute then begin
memo1.text:=opendialog1.FileName;
end;
end; |
das habe ich schon mal, aber er lädt nur den pfad beim laden. und speichern kann er nicht, denn es kommt immer ne fehlermeldung. zugriffsfehler oder so kommt dann.
|
|
Gesus
Beiträge: 43
|
Verfasst: Sa 05.02.05 22:56
Edit:
Das geht auch nicht so, du musst das Laden so machen:
| Zitat: | Opendialog1.Execute;
Memo1.Lines.LoadFromFile(opendialog1.FileName); |
2.- FileName musst du vorher nicht deklarieren, denn das ist schon vordefieniert
3.- du kannst bei deinem Bsp. kein leere StringListe speichern, besser gesagt du musst sie erstmal erzeugen! | Zitat: | | Text:=TStringList.Create; |
|
|
toxicmaster
Beiträge: 94
|
Verfasst: So 06.02.05 08:56
habe es in nem anderen thread schon selber hinbekommen.
aber danke 
|
|
