Bom dia amigos...

Estou usando a funcion "SelectDirectory" da unit "FileCtrl" para permitir ao 
usuário selecionar um diretório para salvar um determinado arquivo. O problema 
é que não consigo colocar o "Botão Criar nova Pasta", igual a caixa de dialogo 
existente por exemplo no WinXP em:

Iniciar / Pesquisar / Todos os arquivos e pastas / No combobox "Examinar em" a 
opção Procurar...

Já tentei "montar"  na mão mesmo esta rotina usando um "ShellTreeView", até que 
ficou legal, mas, não consegui sincronizar a criação física da nova pasta com a 
adição da mesma no "ShellTreeView".

Minha funcion está assim:
var vsTemp : String;
SelectDirectory('Selecione o diretório', '', vsTemp);

Alguém poderia me dar uma help aí??

Grato a todos.

Odair

PS:  Alguém sabe como faço pra deixar de receber esses "Warnings" qdo 
compilo o sistema??
   [Warning] SaveFile.pas(7): Unit 'FileCtrl' is specific to a platform
   [Warning] SaveFile.pas(8): Unit 'ShellCtrls' is specific to a platform

To usando DBS 2006 


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a