savetofile in bestimmtest Verzeichnis / Ordner erstellen

[Sebastian Nintemann]

Ganz einfach: Auch Paramstr(0) gibt dir den kompletten Pfad deiner Anwendung (Exe-Datei) zurück.
Paramstr ist eine Funktion, die dir die eventuell vorhandenen Parameter erwidert. Rufst du dein Programm z.B. unter Ausführen mit

Code:

C:\DeineExeDatei.exe /blah /blub

auf, dann liefert dir Paramstr(1) '/blah', Paramstr(2) '/blub' als string zurück. Der "nullte Parameter" ist immer der Pfad der Exedatei.

Gruß, Sebastian

[Kiaro]

Danke! Hat mir schonmal das gebracht, was ich brauch.
Eine Frage noch, kann ich eine Textdatei erstellen, ohne was reinspeichern zu müssen?
Ich erstelle sie gerade immer folgendermaßen:
tmpstr:=TStringlist.create;
tmpstr.add('');
tmpstr.savetofile('Dateiname');

dann ist aber schon ne leere Zeile drin (logisch eigentlich) es wär aber besser ohne...

Ach ja, bevor ich deswegen jetzt noch einen neuen Thread aufmache,
für ein on key press Ereignis einer Editkomponente, was muss ich schreiben, dass beim Druck der Enter oder Eingabe Taste eine bestimmte Prozedur aufgerufen wird?

mfg Kiaro

[Lord_Stifterl]

Sorry, aber jetzt bin ich überfragt

LG
LS

[Kiaro]

Naja, ich wart mal noch, ob einer mir noch was sagen kann, sonst muss ich mir mal wieder nen Umweg überlegen. Ich will nicht wissen, wieviele Zeilen von meinem Sourcecode Umwege um Probleme, für die ich keine direkte Lösung hatte, sind

mfg Kiaro

[Nightshade]

Delphi-Quellcode:

function TForm1.CreateFile(Filename : string) : Boolean;
var dat : TFileStream;
begin
  result := false;
  if NOT ( FileExists(Filename) ) then begin
    dat := TFileStream.Create(Filename,fmCreate);
    Freeandnil(dat);
    result := true;
  end;
end;

Versuchs mal so....

[Benedikt]

Hi,

dann lass doch einfach das Add(''); weg, bei deiner Stringlist.

Und zum OnKeyPress:

if (Key=#13) then
DiesUndDas;

[Kiaro]

Vielen Dank! Das bringts!

@ Benedikt: Ich weiß ja dass ich hin und wieder aufm Schlauch steh... aber da sollte man selber drauf kommen *blödbin*

P.S.: euer Forum is echt cool, vor allem die schnellen Antworten, bin echt überrascht

mfg Kiaro