Text speichern

[Die Muhkuh]

Zitat von Butch87:

du erstellst dir mit CreateDir('C:\Hallo'); einen neuen Ordner und speicherst dann die Datei(en) darin!!

Wehe Du speicherst direkt auf C:

Schreib das ganze Zeugs lieber in den Anwendungsordner, wie Du an den kommst, sagt Dir die DP, wenn Du nach GetSpecialFolder suchst.

[egon.kaschuba]

Hallo Vip11,

so kannste Speichern.

Delphi-Quellcode:

procedure TForm1.Speichernals1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
 Memo1.Lines.SaveToFile(SaveDialog1.FileName);   // Speichern als ..
end;

Gruß
- Egon

[lbccaleb]

Zitat von Die Muhkuh:

Zitat von Butch87:

du erstellst dir mit CreateDir('C:\Hallo'); einen neuen Ordner und speicherst dann die Datei(en) darin!!

Wehe Du speicherst direkt auf C:

Schreib das ganze Zeugs lieber in den Anwendungsordner, wie Du an den kommst, sagt Dir die DP, wenn Du nach GetSpecialFolder suchst.

in der hinnsicht kannst du dir auch noch mal die befehle GetParamStr(0) und ExtractFilePath in der delphi hilfe ansehen

[mkinzler]

Zitat:

in der hinnsicht kannst du dir auch noch mal die befehle GetParamStr(0) und ExtractFilePath in der delphi hilfe ansehen Wink

Nein, ns Programmverzeichnis sollte man auch keine Daten ablegen

[lbccaleb]

[ot]
wieso das denn nicht??
[/ot]

nee aber so war es von mir auch gar nicht gedacht, so wie du es jaetzt verstanden hast, das sollte nur ein denkstoß sein, wie man den eigenpfad bekommt, damit er von dort seine ordnersystem weiter benutzen kann, deswegen hab ic hauch zitiert..

[mkinzler]

Zitat:

[ot]
wieso das denn nicht??
[/ot]

Sonst muss er zur Bedingung machen, das der Benutzer Adminrechte haben muss und unter Vista die UAC abgeschaltet sein muss.

Zitat:

das sollte nur ein denkstoß sein, wie man den eigenpfad bekommt, damit er von dort seine ordnersystem weiter benutzen kann

Er will schreiben, und dann ist dieser Pfad falsch

[vip11]

ich hab eifach geschrieben:

Code:

procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
CreateDir('Notizen');
end;

.
.
.

procedure TForm1.Button1Click(Sender: TObject);
begin
Text.lines.SaveToFile('Notizen\Notiz1.txt');
end;

[p0w3r5tr34m3r]

also jedes ma wenn du die maus auf der form bewegst, willst du n ordner erstellen? Den sinn musst du mir (und ich denke den anderen) ma erklären

[Butch87]

auf die Antwort bin ich gespannt
@mkinzler: wo sollte man denn sonst die Daten ablegen?!? In den "eigenen Dateien" oder wo?!?

[mkinzler]

Oder unter AllUsers usw. Den im Programmverzeichnis hat nur ein Admin Schreibrechte. Ab Vista mit UAC muss auch der diesen Zugriff bestätigen, da Programme standardmässig nur mit Userrechten gestartet werden.