Aus Delphi neues Programm öffnen

[mkinzler]

Klicke in der IDE auf den Button und Wechsle im OI auf Ereignisse

[DelphiE46]

Ah super.
Und wie verbinde ich mein Quelltext nun mit dem OnClick?

[mkinzler]

Doppelklick auf Button oder Ereignis im OI. Dann wird die Methode angelegt und die Property auf sie gestellt.
Du kannst das auch im Code machen

Delphi-Quellcode:

ComboBox.onClick := <Methode>;

Ohne Parameter, aber Signatur muss stimmen

[haentschman]

Zitat:

Finde gar kein OnClick Event oder so in der Leiste.

Button anklicken (1 mal) -> Objektinspektor -> Ereignisse (Auflistung der möglichen Ereignisse)-> OnClick doppelklick -> procedure für OnClick wird erstellt -> Dein Code rein -> fertig

...hoffe geholfen zu haben :hi:

edit: nix roter Kasten :gruebel: na ja....

[DelphiE46]

Ja das war von beiden sehr hilfreich, jedoch geht der Mist wieder nicht, habe es nun so:

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var Exe: string;
begin
begin
Exe := 'd:\windows\system32\notepad.exe';
ShellExecute(Application.Handle, 'open', PChar(Exe), '', Pchar(ExtractFileDir(Exe)), SW_SHOW);
end;

end.

Kommen jedoch 3 Fehlermeldungen:
Unit.pas(31): Undefinierter Bezeichner: "ShellExecute"
Unit.pas(34): "," erwartet aber "." gefunden
Unit.pas(36): Deklaration erwartet, aber Dateiende gefunden

Und wieso geht das bei euch?? :D

[mkinzler]

Hast du ShellAPI eingebunden?

[DelphiE46]

Nun ja, aber die anderen beiden Fehler bleiben bestehen, deswegen habe ich nach funktionierendem Code gefragt :D

Fehler sind weg, es lag am doppelten begin :D
Jedoch kommt jetzt noch:
Ausgabedatei:...... kann nicht erstellt werden

[mkinzler]

Entferne das überflüssige begin in Zeile 28

[mkinzler]

Was steht den im Ausgabepfad des Projekts? Hast du es schon gespeichert?

[DelphiE46]

Gespeichert habe ich es noch nicht.
Es läuft nun komischerweise, jedoch kann ich den Button anklicken und es passiert nichts :D

Ok habe es nun hinbekommen. Aber warum kann er sowas wie Notepad öffnen und ICQ nicht? :D
Wie mache ich das wenn ich anstatt eine .exe z.B. eine .bat öffnen möchte?