Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: Maverich - Ottobre 27, 2014, 10:18:25 pm

Titolo: Form con BorderStyle = bssizeable
Inserito da: Maverich - Ottobre 27, 2014, 10:18:25 pm

un'amica mi segnala questo problema (mi sembrava strano, ma lo riscontro anch'io)
nel progetto solo Form1 e' autocreate

un Form che crea un FormFiglio (non MDI), con 2 TEdit

con BorderStyle = bsSizeable i TEdit sono accessibili solo tramite tab, puntando il mouse sul TEdit non riceve il focus e non risulta editabile
con BorderStyle = bsNone invece nessun problema

non ci avevo mai fatto caso, uso solo form non ridimensionabili appunto con bsNone, ma lo stesso comportamento si ha anche in Delphi.
c'e' un motivo per questo comportamento e si puo' risolvere ?

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2 := TForm2.Create(self);
  Form2.parent := self;
  Form2.Top := 0; Form2.Left := 0;
  Form2.Show;
end;   

Titolo: Re:Form con BorderStyle = bssizeable
Inserito da: Stilgar - Ottobre 28, 2014, 01:11:05 pm

Prova con :

Codice: [Seleziona]

  Application.CreateForm(TForm2, Form2);       
 Form2.Show;

;)