Verknüpfungen

[swordwolt]

hallo ich benutze das Delphie 7 Personal und muss was für die Schule programmieren.

Meine Frage ist vllcht schoneinmal gekommen aber da ich wenig Zeit hatte bitte ich es zu entschuldigen das ich ned alle Treads lesen konnte.
Also meine Frage wäre wie kann ich im Delphie mit einem Button einen externen Link zum Starten einer Exe Datei herstellen. Ich habe schon vieles ausprobiert aber nichts hatt geklappt.
Des weiteren würde ich ebenfalls noch zwei projekte miteinander über einen Button verknüpfen.
Wenn jemand einen programmiertext als Beispiel dafür hätte würde ich mich sehr freun. Also danke schonmal im vorraus.

MFG

swordwolt

[lbccaleb]

erstmal hallo und willkommen in der dp :dp: :dp:

möchtest du eine link (.lnk) datei erstellen oder möchtest du ein programm nur per knopfdruck verlinken??

[DeddyH]

Hallo und Willkommen in der DP :dp:
leider hab ich nicht ganz verstanden, was Du machen möchtest. Soll per Button ein anderes Programm gestartet werden oder möchtest Du eine Verknüpfung z.B. auf dem Desktop anlegen?

[edit] :lol: Da bin ich wohl nicht alleine :roll: [/edit]

[lbccaleb]

Zitat:

Zitat von DeddyH

leider hab ich nicht ganz verstanden
[edit] :lol: Da bin ich wohl nicht alleine :roll: [/edit]

da warst du nciht der einzige, nur ich war schneller^^

[DeddyH]

Sieht ganz so aus. @swordwolt: das heißt Delphi ohne e hinten ;)

[Mikender]

Um mit einem Button eine .exe zu starten kannst du doch einfach ShellExecute nehmen

Oder was willst du erreichen

[swordwolt]

ein programm per knopfdruck sollte es sein

[lbccaleb]

Zitat:

Zitat von swordwolt

ein programm per knopfdruck sollte es sein

dann schreibst du in den codeabschnitt vom button:

Delphi-Quellcode:

              Shellexecute(hwnd, 'open', PChar('DeinProgrammHierRein.exe'), nil, nil, SW_SHOWNORMAL);

[Jeopardize]

Verknüpfung erstellen:
http://www.delphi-treff.de/tipps/dat...nisse/tipp/64/

Ich glaube das das gemeint war.

[swordwolt]

Das programm muss dann aber im selben ordner sein oder kann ich da auch nen ganzen pfad angeben?

[Fussball-Robby]

Ja, kannst du. Such mal hier im Forum, da gibts dutzende Beispiele dazu.

Mfg

[lbccaleb]

ja kalr kannst du nen kompletten pfad angeben, aber bei meinem bsp hab ich noch was vergessen:

Delphi-Quellcode:

Shellexecute(hwnd, 'open', PChar('c:\deinordner\DeinProgrammHierRein.exe'), nil, nil, SW_SHOWNORMAL);
//hwnd kannst du als nil (0) angeben

[DeddyH]

Und wenn das zu startende Programm Parameter erwartet, das erste nil durch PChar(<Parameterstring>) ersetzen.

[swordwolt]

Okey soweit hab ich es verstanden. Nun noch eine Frage. Diese Verknüpfung ist ja relativ statisch. Das heißt wenn ich das Programm verschiebe müssst ich alle Vreknüpfenen neu definieren. Da ich alle Verknüpfungen untereinander in einem Großen Ordenr habe müsste dies ja auch so gehn dasd diese Verknüpfungen nach außerhalb dynamisch erscheinen. Das heißt das der Bezugspunkt nicht der Arbeitsplatz ist sondern der Ordenr.

Um mal ein Beispiel zu nennen.

Mein Ordner heißt "a" ich hab in einem unterordner "a/b" ein programm dies will ich mit einem Link zu einem Programm im Ordener "a" Verknüpfen und mit einem anderen programm im Ordenr "a/c". Aber wenn ich den Ordner a verschiebe sollen die velinkungen trotzdem aktuell bleiben.


Geht dies zu verwirklichen???

[lbccaleb]

also leicht ist das nicht zu bewerkstelligen, müsste aber gehen wenn du die dateioperation überwachst, also alles was so im dateisystem verändert wird...

ne andere möglichkeit währe, die pfade (links) zu den verschiedenen dateien in einer seperaten hauptdatei auszulagern...
vllt unter benutzung von einer ini/txt datei!!!
das währe aber gleub ich die sinvollere lösung..

[swordwolt]

So ich hab volgenden code angegeben

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
Shellexecute(hwnd, 'open', PChar('e:Programme/hamachie\hamachi.exe'), nil, nil, SW_SHOWNORMAL);
end;

und es kommt volgender error
[Error] Unit1.pas(28): Undeclared identifier: 'Shellexecute'
[Error] Unit1.pas(28): '(' expected but ',' found

Bitte helft mir

[DeddyH]

Delphi-Quellcode:

uses ShellAPI; //wichtig!!

procedure TForm1.FormCreate(Sender: TObject);
begin
  Shellexecute(Handle, 'open', PChar('e:\Programme\hamachie\hamachi.exe'), nil, nil, SW_SHOWNORMAL); //richtiges Trennzeichen verwenden
end;