Devida

[bocaaberta 1]

ae galera tem como tpw colocar comando num botao edit tpw ta la o edit e tal's

ai colocar comando + pra aumenta e - pra diminuir tem como ?

[luxfer 0]

Dexa eu ver se eu entendi:

Um Botão para aumentar um Edit e outro para Diminuir?

 

Evento OnClick para aumentar

Edit1.Width := Edit1.Width + 1; {aumenta o comprimento}

Edit1.height := Edit2.Height + 1 {aumenta o tamanho}

 

Evento OnClick para diminuir

Edit1.Width := Edit1.Width - 1; {diminui o comprimento}

Edit1.height := Edit2.Height - 1 {diminui o tamanho}

[Mestre_Vator 0]

Se for para aumentar um número no edit,crie uma variável integer,incremente e decremente ela e coloque-a no edit,(inttostr)...

[brunoragk 0]

@bocaaberta

És o code

procedure TForm1.Button1Click(Sender: TObject);

begin

Edit1.Width := Edit1.Width + 1;

Edit1.height := Edit2.Height + 1;

Edit1.Width := Edit1.Width - 1;

Edit1.height := Edit2.Height - 1;

end;

[Mestre_Vator 0]

Muito diferente do do Lúcifer (luxfer) ¬_¬

 

Resposta desnecessária.

[Ryokusei 28]

@bocaaberta

És o code

 

És a punição por flood.

[~OwneR~ 8]

És a punição por flood.

 

 

Desculpa, eu não aguentei =(

*É, eu sei que vou levar warn -q*

[Mestre_Vator 0]

Kkkkkkkkkkkkkk eu ri !

 

Desculpe,não agüentei

 

*É,eu sei que vou levar warn*

[viniiie. 6]

@~OwneR~ & @Mestre_Vator

Infracionado por flood primário.