Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

QuIx

Qual erro nesse código?

Recommended Posts

Procedure TForm1.Button6Click(Sender: TObject);beginwith TDDEClientConv.Create(Self) do begin  ConnectMode := ddeManual;  ServiceApplication := 'explorer.exe';  SetLink( 'Folders', 'AppProperties');  OpenLink;  ExecuteMacro('[FindFolder(, C:\Windows)]', False);  CloseLink;  Free;end;

Alguém pode me dizer e se possível concertar? É um código que procura arquivos no windows http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.