Schnellstartleiste

[Daniel G]

Wie hieß dieses Lied von Scooter nochmal? "I'm your Pusher?"

So what..

Erstmal: Wozu zum Henker benötigt das Programm die Indys in der Uses?
Dann: Das Problem liegt hier:

Delphi-Quellcode:

procedure TForm1.WMDROPFILES (var Msg: TMessage);
//[...]
begin
//[...]
Icon := TIcon.Create;
try
 Icon.Loadfromfile(dateiname);
//[...]
end;

Das LoadFromFile macht keinen Sinn. Die Funktion erwartet eine gültige *.ico - Datei, und keine Executable.
Daher müsste es lauten:

Delphi-Quellcode:

procedure TForm1.WMDROPFILES (var Msg: TMessage);
//[...]
begin
//[...]
Icon := TIcon.Create;
try
 Icon := FileIcon(Dateiname);
//[...]
end;

Soweit ich das gesehen habe, wird das Icon aber noch keinem Button zugewiesen, richtig? Mal schauen, ob ich heute Abend ein kleines Beispiel schaffe, wenn sich noch nichts getan hat.

[mOzZzI]

ähm, Daniel G könntest du mir vill ein Beispiel machen?

[Daniel G]

Ich glaub', da hab' ich nen Thread vergessen... *im Posteingang 'rumkram* ...'tschuldigung...

*räusper*

Brauchst du das immer noch?

[mOzZzI]

Ne, bruachs nich mehr, ich hab ja mein Programm jetzt schon fertig:

ToolBar

Trotzdem danke,

Gruß Philipp