Autor Beitrag
uranop
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 149

Win XP, Win 7, Slackware 11, FreeBSD
D6E, php
BeitragVerfasst: Sa 19.07.08 20:08 
Hi delpher

ma ne frage ...
ich bin gerade dabei im zuge einer geraetebuch erstellung
saemtliche relevanten daten aus dem pc auszulesen.
klapp alles wunderbar derzeit

so nun kommt das naechste thema. ich will diese daten in ein xls
speichern ... funktioniert auch aber nur mit absolutem pfad wie C:\path\to\file.xls

nach dem ich aber das tool geschrieben habe um mit meinem usb stick damit rumlaufen zu koennen
soll delphi seine via xls erstellste datei in einem ordner speichern von dem es auch ausgeführt wird

wechsel datentraeger haben ja laufend andere laufwerksbuchstaben ...

also einfach hergehen und

Excel.ActiveWorkbook.SaveAs('.\geraetebuecher\' + Edit1.Text + '.xls');

so wie ich es analog aus php kennen wuerde is nicht...


irgendwelche vorschlaege ?

schoenen abend noch !!!
Grenzgaenger
Ehemaliges Mitglied
Erhaltene Danke: 1



BeitragVerfasst: Sa 19.07.08 20:14 
das was du brauchst steht im paramstr(0) . daraus kannst du dann deinen pfad extrahieren extractpathname und ggf. unterverzeichnise und dateiname/extension hinzufügen... der pfad ist dann zwar wieder absolut, aber dafür weisst du wohin du schreibst :-)
uranop Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 149

Win XP, Win 7, Slackware 11, FreeBSD
D6E, php
BeitragVerfasst: Sa 19.07.08 20:17 
hui das ging ja fix : )

merci schon mal ... ich setze mich mal damit auseinander

// Edit

ExtractFilePath(ParamStr(0))

und die sache rennt

merci noch mal
Timosch
ontopic starontopic starontopic starontopic starontopic starofftopic starofftopic starofftopic star
Beiträge: 1314

Debian Squeeze, Win 7 Prof.
D7 Pers
BeitragVerfasst: Sa 19.07.08 21:01 
Oder alternativ auch ExtractFilePath(Application.Exename);

_________________
If liberty means anything at all, it means the right to tell people what they do not want to hear. - George Orwell