[[egostar]]

Y si pruebas en el evento Onshow.....

Código Delphi [-]
procedure TForm1.FormShow(Sender: TObject);
var
  C4_server1_nombre :string, 
begin
  //Chequeamos y activamos los botones segun INI
  C4_server1_nombre:= retINI( 'C4', 'SERVER1_Nombre');
  if Length(Trim(C4_server1_nombre)) > 0 then begin
    Button1.Caption := C4_server1_nombre;
    Button1.Visible := true;
    Button1.onClick  := Ejecutor(var1, var2 );
  end;
end;

Salud OS