Kopieren

[Alves]

Ich wollte fragen ob es einen Code gibt wo sich die exe in ein bestimmtes Verzeichnis verschiebt/kopiert?

[Kaeru Gaman]

Ägypten?

[hardfalcon]

Du meinst, du brauchst nen Code, der dir eine genaue Pfadangabe zurückliefert, in welchem Verzeichnis sich das Programm befindet, und wie die Programmdatei heißt? Dann schau mal hier:
http://www.purebasic.fr/german/viewtopic.php?t=4606

[Alves]

@KG

Kairo?

@HF

Nein ich meine einen Code, bei dem sich die exe in ein bestimmtes Verzeichnis kopiert.[/url]

[ts-soft]

Code: Alles auswählen

Ziel.s = "c:\windows\temp\test.exe"
Path.s = Space(#MAX_PATH * 2)
GetModuleFileName_(0, @Path, #MAX_PATH * 2)
CopyFile(Path, Ziel)

[Alves]

Irgendwie klappt der bei mir nicht oder ich vertseh ihn nicht..
Muss ich da noch etwas verändern?

Edit:// GetModuleFileName() gehtbei mir nicht, da ich die Demo habe, klappts dann gar nicht?

[hardfalcon]

Nein, da musst du dir wohl die Vollversion zulegen.

[125]

Nein, da musst du dir wohl die Vollversion zulegen.

MÄÄÄP Lüge

Besorg dir mal den ApiViewer schalt die Sicht auf Purebasic dann such nach GetModuleFilename

[Alves]

ApiViewer?
Von Api schon mal gehört aber, was ist das?
NOOB! (ich)

[hardfalcon]

Nein, da musst du dir wohl die Vollversion zulegen.

MÄÄÄP Lüge

Besorg dir mal den ApiViewer schalt die Sicht auf Purebasic dann such nach GetModuleFilename

Mann, stimmt ja! Daran hab ich noch gar nicht gedacht!

//EDIT: Mit dem Code hier kannst du GetModuleFileName_() ersetzen:

Code: Alles auswählen

OpenLibrary(0,"kernel32.dll")
CallFunction(0,"GetModuleFileNameA",hModule.l, lpFileName.String, nSize.l)

//EDIT2:

Dein Code wäre demnach:

Code: Alles auswählen

OpenLibrary(0,"kernel32.dll")
Ziel.s = "c:\windows\temp\test.exe"
Path.s = Space(#MAX_PATH * 2)
CallFunction(0,"GetModuleFileNameA",0, @Path, #MAX_PATH * 2)
CopyFile(Path, Ziel)