Entwickler-Ecke
Dateizugriff - "Sich selbst" irgendwo hinkopieren...
Quietdeath - So 20.07.03 08:42
Titel: "Sich selbst" irgendwo hinkopieren...
ich wollte mal wissen, wie ich es machen kann dass sich mein programm selbst in einen ordner kopiert...
also zum beispiel in eigene dateien
Geht das?
Hansi@OMG - So 20.07.03 10:00
Ja , das geht:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
| procedure TForm1.Button1Click(Sender: TObject);
var
ProgDir: String;
begin
ProgDir:=ExtractFilePath(ParamStr(0));
Copyfile(PChar(Progdir),PChar('C:\Programme\'),true);
end; |
Quietdeath - So 20.07.03 11:07
k ein großes Danke von mir :D
Quietdeath - So 20.07.03 11:12
da fallen mir 2 neue fragen ein:
1. kann man abfragen wo sich die exe grade befindet? also das das programm rausfindet wo es is
2. falls das programm mit exe binder irgendwo dran war... kann man es daraus lösen und irgendwo hinkopieren?
Delete - So 20.07.03 11:28
| Hansi@OMG hat folgendes geschrieben: |
| Ja , das geht: |
Aber nicht so. Du übergibst den Namen des Ordners, in dem sich die Exe befindet, und den Namen des Zielordners. Das reicht nicht zum Kopieren. Außerdem ist "CopyFile" eine
Funktion, mit deren Rückgabewert (TRUE oder FALSE) man den Erfolg kontrollieren kann:
Delphi-Quelltext
1:
2:
3:
| ProgDir:=ExtractFilePath(ParamStr(0));
if not Copyfile(PChar(Progdir),PChar('C:\Programme\'),true) then
ShowMessage('Na, das war wohl nix.'); |
Bitte die Suchfunktion zu Rate ziehen:
COPYFILE.
| Quietdeath hat folgendes geschrieben: |
| 1. kann man abfragen wo sich die exe grade befindet? also das das programm rausfindet wo es is |
Augen auf!
Delphi-Quelltext
1:
| ProgDir:=ExtractFilePath(ParamStr(0)); |
holt den Ordnernamen aus dem Namen des laufenden Programms. :)
Quietdeath - So 20.07.03 11:52
ja mensch ich hab delphi erst vor 3 tagen gelernt ... :)
aber trotzdem danke :P das werd ich bei mir dann integrieren
scrooge - Di 22.07.03 19:04
| Zitat: |
| 2. falls das programm mit exe binder irgendwo dran war... kann man es daraus lösen und irgendwo hinkopieren? |
Hört sich für mich an, als wolltest du en Trojaner schreiben ?? :wink:
Quietdeath - Di 22.07.03 19:18
Ne nen trojaner wollte ich nich programmieren aber mein freund hat mich nach sowas gefragt :wink: :arrow:
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!