Entwickler-Ecke

Dateizugriff - Pfad herausfinden (erledigt)


Schakal - Mi 29.10.03 23:36
Titel: Pfad herausfinden (erledigt)
Und gleich noch ne Frage :D

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
 
procedure TForm1.Button3Click(Sender: TObject);
begin
        if OpenDialog1.Execute then
        begin
                Projekt := OpenDialog1.FileName;
                Edit1.Text := Projekt;
        end;
end;

hier öffne ich eine datei, nehmen wir an
c:\test\verzeichnis.txt

wie kann ich jetzt einer variable den pfad, also c:\test\ zuweisen?

Moderiert von user profile iconTino: Delphi-Tags hinzugefügt.


UGrohne - Mi 29.10.03 23:37

Delphi-Quelltext 
1:
 
Projekt:=ExtractFilePath(OpenDialog1.Filename);


Raphael O. - Mi 29.10.03 23:39

Delphi-Quelltext 
1:
 
extractfilepath(opendialog1.filename);

gibt auch noch was anderes, und entweder das hier oder das andere liefert am Ende das "\" nicht mit zurück...
einfach mal ausprobieren ;)


Schakal - Do 30.10.03 00:06
tnx
noch ne frage, glaube nicht das es sich lohnt für so etwas noch nen neuen thread aufzumachen

Delphi-Quelltext 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
 
procedure TForm1.BitBtn3Click(Sender: TObject);
var
        pfad2 : string;
        datei : string;
begin
        Pfad2:=ExtractFilePath(ParamStr(0));
        datei:=Pfad2+('splash.sp');
        CopyFile(PChar(datei), PChar(Pfad),False);
end;

end.

so wie das aussieht, stimmt doch alles, wieso kopiert der die datei nicht?
ShellAPI ist eingefügt. die Variable Pfad ist vorher im programm definiert hab false auch schon durch true ersetzt, klappt auch nicht

Moderiert von user profile iconTino: Code- durch Delphi-Tags ersetzt.


barfuesser - Do 30.10.03 09:28
Schakal hat folgendes geschrieben:
die Variable Pfad ist vorher im programm definiert
Kann es sein das im Ziel ebenfalls ein Dateiname angegeben werden muß?

barfuesser


Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!