FORUM DARKERS

Tecnologia & Informática => Programação => Delphi => Topic started by: OnlyOne on 30 de April , 2006, 12:30:54 PM

Title: Duvida TLabel e TButton
Post by: OnlyOne on 30 de April , 2006, 12:30:54 PM
to com o seguinte problema , como e q faço pra cancelar a açao de um TButton e retornar para a aplicaçao ?

Exemplo dentro do codigo de um TButton:

if edit.GetTextLen = 0 then
 begin ShowMessage('Digite alguma coisa !');
 

 PARA  A EXECUÇAO DA PROCEDURE E RETORNA

 end;

e tb preciso percorrer um array de strings e exibir o conteudo em um TLabel
so q no label nao aparece o conteudo do array , so aparece em dialogs

alguem sabe como resolver ?
Title: Re: Duvida TLabel e TButton
Post by: caesar2k on 30 de April , 2006, 02:55:10 PM
Para terminar o procedure antes do tempo, use Exit;
E eu não entendi o que você quer fazer com o array de strings, como só mostra em dialogs?
Title: Re: Duvida TLabel e TButton
Post by: OnlyOne on 30 de April , 2006, 03:50:58 PM
exemplo

vet : Array [0..2] of String = ('a','b','c');


for i := 0 to High(vet) do
begin

label.Caption := vet [ i ];

end;

so q nao aparece nada no label mas se eu fizer

for i := 0 to High(vet) do
begin

ShowMessage( vet [ i ] );

end;

dai funciona , entende ?