Entwickler-Ecke
Freeware Projekte - Windows Underground Programs
BadAzz - So 04.12.05 11:42
Titel: Windows Underground Programs
Hallo
Ich bin zwar noch nicht weit in Delphi aber ich habe mal ein Programm geschrieben, mitdem man WindowsProgramme die man schwer findet nzw. in *Ausführen* eingeben muss öffnen kann.
WICHTIG:
Die .exe muss in das Windows Install Verzeichniss. Sonst klappts nicht!!!
Born-to-Frag - So 04.12.05 12:24
Eigendlich eine gute Idee, aber der Benutzer sollte nicht getzwungen sein das Programm in deinem Windows Ordner zu haben.
greetz
BadAzz - So 04.12.05 12:29
ICh wusste nicht wie ich das sonst machen sollte weil wenn ich sage open C:\...
und jemand hat das z.B. auf F:\ dann klappts net!!!
Born-to-Frag - So 04.12.05 12:37
Es gibt doch funktionen, das installationsverzeichnis von Windows herauszufinden..
greetz
BadAzz - So 04.12.05 12:44
Das wusste ich nicht. (bin newbie^^) Ich kenn den befehl gar nicht....
huhn - So 04.12.05 13:43
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
| function GetWinDir: String;
var
Dir: String;
Len: DWord;
begin
SetLength(Dir,MAX_PATH);
Len:=GetWindowsDirectory(PChar(Dir),MAX_PATH);
if Len>0 then
begin
SetLength(Dir,Len);
Result:=Dir;
end
else
RaiseLastOSError;
end; |
Aus Easy Helper Network
mfg huhn
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!