Konversi Bilangan

Listing Delphi

procedure TForm1.FormActivate(Sender: TObject);

begin

form1.Height :=401;

combo1.SetFocus ;

label7.Visible :=false;

end;