Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: Frankq - Gennaio 20, 2014, 01:05:46 pm

Titolo: Flusso programma
Inserito da: Frankq - Gennaio 20, 2014, 01:05:46 pm

Ciao a tutti
Non riesco a capire dove devo mettere una procedura di inizializzazione quando parte l'applicazione.
Un'indicazione e un link al wiki?.

Stessa cosa per il debug. Ho capito come seguire il flusso ma se voglio vedere il contenuto di una variabile come faccio?
(il link è gradito)

Franco

Titolo: Re:Flusso programma
Inserito da: xinyiman - Gennaio 20, 2014, 03:08:15 pm

Se nella tua applicazione usi le form, ti consiglio di usare l'evento FormCreate per inizializzare.

Diversamente metti un brackpoint e poi posizioni il mouse sulla variabile incriminata, dovrebbe indicarne il contenuto

Titolo: Re:Flusso programma
Inserito da: Frankq - Gennaio 20, 2014, 06:55:11 pm

Ciao
Volevo creare un bottone a runtime ecco il codice

Codice: [Seleziona]

var
  Form1: TForm1;
  Btn : TButton;    

procedure TForm1.FormCreate(Sender: TObject);
begin
  Btn:=TButton.Create (Self);
  btn.Left:=20;
  btn.Top:=20;
  btn.caption:= 'Pippo';
  btn.Tag:=1;

end;  

Però il pulsante non si vede
Franco

Titolo: Re:Flusso programma
Inserito da: Legolas - Gennaio 20, 2014, 08:46:39 pm

Manca il parent:

Codice: [Seleziona]

var
  Form1: TForm1;
  Btn : TButton;    

procedure TForm1.FormCreate(Sender: TObject);
begin
  Btn:=TButton.Create (Form1);  // mettendo form1 il button viene distrutto automaticamente alla chiusura dell'applicazione
  btn.Parent := self;
  btn.Left:=20;
  btn.Top:=20;
  btn.caption:= 'Pippo';
  btn.Tag:=1;

end;  

Titolo: Re:Flusso programma
Inserito da: nomorelogic - Gennaio 22, 2014, 08:59:46 am

nei metodi di TForm1 self punta alla stessa istanza di Form1 ;)