![]() |
OpenDialog Datein öffnen und woanders speichern...?
Hi,
Also ich habe eine kleines Programm geschrieben womit man Weblinks verwalten kann schön übersichtlich mit Kategorien, Unterkategorien und Beschreibung. Da ich soetwas nicht im Internet gefunden habe und sowas brauch, weil ich den Favoriten Ordner schon so manches mal bei meiner XP Neuinstallation gelöscht hatte. So ich möchte irgend wie wenn ich auf Daten Importieren klick auswählen können wo meine beiden XML Datenbank Datein sind (Kategorie.xml und Website.xml) dann möchte ich sie in meinem Programmverzeichniss speichern.... 1. Wie weiß mein Prog, in welchem Pfad es liegt? 2. Wie kann ich z.B. mit dem OpenDialog eine Datei öffnen und woanders speichern? Wenn ich OpenDialog.Files.SavetoFiles('website.xml'); ausführe schreibt er nur den Dateinamen plus Pfad in eine neu angelegte Datei. Das Daten exportieren in ein anderes Verzeichniss ist ja dann selbstklärend wenn ich weiß wie diese beiden sachen funzen... Ps. wenn einer ein gutes Programm weiß zum Verwalten von Links dann sag ers mir bitte |
Re: OpenDialog Datein öffnen und woanders speichern...?
hallo
mit opendialog erhältst du den Ort wo die datei liegt, mit Savedialog erhältst du den Ort wo die datei hinsoll, jetzt musst du die Datei auch noch dort hinkopieren. zB CopyFile mfg freak |
Re: OpenDialog Datein öffnen und woanders speichern...?
Also zu Punkt 1 kann ich dir empfehlen, die die Application.ExeName-Eigenschaft in Verbindung mit der Funktion ExtractFilePath anzuschauen.
Bei Punkt 2 weiss ich leider nicht so recht, was du meinst. Ich habe noch nie mit Files.SaveToFiles gearbeitet, und weiss gerade nicht, was diese Funktion bewirkt. Wenn Du mit dem OpenDialog Datein öffnen willst, um sie woanders zu speichern (=kopieren), dann habe ich das bisher immer so gemacht, dass ich für jede Datei eine Kopier-Funktion aufgerufen habe. Gruß |
Re: OpenDialog Datein öffnen und woanders speichern...?
Kannst es auch so machen wenn du die datei kopieen willst und zwingend mit OpenDial arbeitest.
Delphi-Quellcode:
Die Datei Test.txt erscheint in dem Ordner wo du andere geladen hast, musst halt nur vorher den Pfad angeben wo sie hinsoll dann is das Prob auch gelößt.
OpenDialog1.Execute;
OpenDialog1.Files.LoadFromFile(OpenDialog1.FileName); OpenDialog1.Files.SaveToFile('test.txt'); Und wenn du den Pfad deiner eigenden exe willst dann so
Delphi-Quellcode:
var
strg: String; begin strg := extractfilepath(application.exename); //oder strg := extractfilepath(paramstr(0)); end; |
Re: OpenDialog Datein öffnen und woanders speichern...?
Müsste so passen:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var M:Tmemorystream; begin M:=TMemorystream.Create; M.LoadFromFile(OpenDialog1.FileName); M.SaveToFile(ExtractFilePath(Application.Exename)); end; |
Re: OpenDialog Datein öffnen und woanders speichern...?
Hast Du bei SaveToFile nicht den Dateinamen hinter dem Pfad vergessen? Oder merkt sich TMemoryStream den vom Öffnen?
|
Re: OpenDialog Datein öffnen und woanders speichern...?
Ok danke für die schnelle Hilfe :)
werde mich dann nachher mal ransetzen und es ausprobieren. kann das Prog ja dann wenns fertig ist und Interesse besteht reinstelln. |
Re: OpenDialog Datein öffnen und woanders speichern...?
ok mach das
mfg freak |
Re: OpenDialog Datein öffnen und woanders speichern...?
Noch eine Frage wie bekomme ich NUR den Dateinamen raus von der Datei die ich eben geladen habe? Ohne Verzeichnisspfad?
|
Re: OpenDialog Datein öffnen und woanders speichern...?
Hi
Code:
sollte so gehen.
ExtractFileName(opendialog1.filename);
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz