Duvida TLabel e TButton

[OnlyOne]

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 ?

[caesar2k]

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?

[OnlyOne]

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 ?