1 Dica legal (DELPHI 7)



Link para download:

Clique aqui

-------------------------------------------------------------------------
PARA CONEXÕES LENTAS...
------------------------------------------------------------------------

Bem fácil e bem legal...



1 - adiciona :

1-button;
1-edit;
1-listview (win32);

2 - posicione assim:


3 - vamos mudar o caption, text:

caption do button 1 você coloca (Ok);
text do edit1 você coloca (' ');

4 - configurando a listview:

4.1 - vamos no object inspector;
4.2 - no object inspector:

mude a propriedade gridlines para (true) ;
mude a propriedade viewstyle para (VSReport);

----viu a transformação...

4.3 - vamos dar um clique duplo no listview... irá abrir uma caixa de dialogo.
Na caixa de dialogo você vai clicar akkkki:


Depois de clicar você terá criado propriedades... Vá nessas propiedades e mude o WIDTH para 200 ou mais...

5 - Adicione um (XPManifest - (Win32));

----------------------------------------------------------

Vamos programar:

É bem fácil : Clika no Button1 e adiciona isso...


 Código:

var
a: TLisTitem;
begin
a:= ListView1.Items.Add;
a.Caption:= edit1.Text;

Não esqueça de apagar o begin...

E depois é só executar...
1 Dica legal (DELPHI 7) 1 Dica legal (DELPHI 7) Reviewed by Dayvid on 20:10 Rating: 5

Nenhum comentário