Zitat von
Luckie:
Zitat von
malo:
@Luckie:
Unit einbinden? Was für 'ne
Unit und wo genau? Sry, ich kenn mich da einfach nich aus
Ja, wie es auch in dem Tipp in der Code-Lib steht:
Zitat von
Code-Lib:
Benötigt wird die
Unit ShlOBJ.
Interressant wäre da, dass der Post erst heute Mittag editiert wurde
Ich hab da nämlich das Gefühl, dass das erst heute eingefügt wurde, denn als ich mir das zuletzt angesehen hab, stand da noch nichts wegen einer
unit
Naja, wie dem auch sei. Ich hab ja ShlOBJ in der uses-klausel, damit dürfte das wohl erledigt sein, denke ich(berichtigt mich bitte, wenn ich falsch liege).
F:\ existiert und man darf dort schreiben.
Zu MyPath1:
MyPath1 ermittelt den eigenen Programmpfad. Hier mal der Quellcode aus dem OnClick-Ereignis:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var MyPath1 : string;
begin
MyPath1 := ExtractFilePath(Application.ExeName);
CreateLink (MyPath1+'Project2.exe', 'F:\Verknüpfung.exe', 'Verknüpfung');
end;
Da wird nun der aktuelle Programmpfad ermittelt und in der Variable MyPath1 gespeichert. Danach wird direkt mit dieser Variable weitergearbeitet. Ich hab also den Programmpfad, hänge da noch den Dateinamen an und das ist dann mein Zielprogramm
Mir ist übrigens grade aufgefallen, dass die Datei "Verknüpfung.exe" erstellt wird, nur ist es halt eine ganz normale .exe ohne irgendeine Funktion