Forum: Sonstige Fragen zu Delphi
by Marco Steinebach,
27. Okt 2018
Hallo zusammen,
Jep! Die "eingeschränkten Rechte" waren die Lösung.
Ich bin auch gerade darauf gestoßen, aber ihr wart schneller!
Vielen herzlichen Dank fürs Lösen helfen.
Herzliche Grüße
Marco
Forum: Sonstige Fragen zu Delphi
by Marco Steinebach,
26. Okt 2018
Huhu Kodezwerg,
Code? Völlig langweilig:
processExists (edit1.text, l, idx);
memo1.lines.Add (format ('Name: %s', ));
if l.count > 0 then
memo1.lines.add (format ('Pfad: %s', ]))
else
memo1.lines.Add ('Pfad nicht ermittelt');
l.free;
Forum: Sonstige Fragen zu Delphi
by Marco Steinebach,
23. Okt 2018
Hallo Kodezwerg, hallo zusammen,
erstmal entschuldigung dafür, dass ich deinen Code fälschlicherweise Michael zugeschlagen habe. Sorry!
Ich hatte ihn auch schon überarbeitet, aber deine Version ist definitiv schöner, alleine schon, weil die Funktion aus Kernel32 erst in der Funktion eingebunden wird.
Funktioniert auch unter D5 prima - vielen Dank.
Ein kleiner Fehler ist aber noch drin, die...
Forum: Sonstige Fragen zu Delphi
by Marco Steinebach,
20. Okt 2018
Und nochmal,
Wenn man in Michaels Code
if GetModuleFileNameEx (myHandle, 0, PChar(fullPath), MAX_PATH) > 0 then}
durch
var
fLen: cardinal;
...