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
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

edit: nix roter Kasten 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??

[mkinzler]

Hast du ShellAPI eingebunden?

[DelphiE46]

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

Fehler sind weg, es lag am doppelten begin
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

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