Fórum desenhar botao no panel no canto superior direito delphi #457136
01/10/2013
0
Galera eu estou precisando desenhar um botão em tempo de execução no panel no canto superior direito delphi, para pode fechar o formulário.
Eu já crio o botão, só não consigo alinha no canto superior direito do formulário.
Eu já crio o botão, só não consigo alinha no canto superior direito do formulário.
var
Botao : TButton;
begin
Botao := TButton.Create(Self);
with Botao do
begin
Parent := PTitulo;
Caption := 'x';
Anchors := [akRight, akBottom];
left := -100;
Height := 20;
Width := 20;
// OnClick := ClickBotao;
end;
Sidney Abreu
Curtir tópico
+ 0
Responder
Posts
01/10/2013
Marcos Oliveira
Sidney, tire o "Left" seu fonte, e coloque as linhas abaixo:
Att,
Marcos
Top := 0;
Left := PTitulo.Width - 20;
Att,
Marcos
Responder
Gostei + 0
01/10/2013
Sidney Abreu
vlw amigo, deu certo.abraço
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)