[DELPHI 6] creare eventi

[pitoticino]

Ciao forum! sono un "novello" di Delphi e della programmazione in generale. Sto diventando matto perché riesco a creare, ad esempio, un button ma non riesco a creare l'evento...
Gli so dire dove posizionarsi, la caption, il parent ma non so come dirgli cosa fare quando lo clicco...

Spero veramente di trovare la soluzione,ne va della mia salute

Grazie
Pito

[bDaniele]

Nell'object inspector (lo visualizzi premendo F11) hai le proprietà e gli eventi dell'oggetto selezionato, vai nella categoria eventi e fai doppio click su quello che desideri utilizzare.

E' possibile associare un evento anche run-time semplicemente creando una procedura/funzione con lo stesso prototipo di quella dell'evento a cui la vogliamo associare e sostituirla a quella di default.

Ciao.

[pitoticino]

con l'object inspector é chiaro,il mio problema é che uso il comando create e al momento della stesura del codice non é ancora "visibile" per cliccare F11...

Quando creo il button riesco ad arrivare a onClick := ma poi non so cosa scrivere... ho provato a creare una procedura semplice,ma non la prende. Ha a che fare magari con il sender?

Saluti da Zurigo

Pito

P.S: già che ci siamo,cos'é il prototipo?

[bDaniele]

scusa non avevo capito la domanda!

unit Unit1;

interface

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

type
TForm1 = class(TForm)
Button1: TButton;
procedure btn1OnClick(Sender: TObject);
procedure FormShow(Sender: TObject);
private
public
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.btn1OnClick(Sender: TObject);
begin
MessageDlg('Che bello!!!', mtInformation, [mbOK], 0);
end;

procedure TForm1.FormShow(Sender: TObject);
begin
with TButton.Create(Form1) do
begin
Name := 'Btn1';
Parent := Form1;
Caption := 'Bottone1';
Top:=40;
Left:=40;
OnClick:=btn1OnClick;
end;
end;

end.

Ciao e salutami i miei parenti a zurigo!!

[bDaniele]

P.S: già che ci siamo,cos'é il prototipo?

il prototipo di una funzione o di una procedura è la dichiarazione che di solito va nella sezione private.

Ciao

[pitoticino]

:mavieni: Funziona!
Grazie mille
ciao