Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
olá a todos
criei uma função q teoricamente só me mostraria no shelllistview as pastas, e os arquivos do tipo especificados no combobox, teoricamente sem precisar mexer em nada, quando inicio o programa aparece assim :
/applications/core/interface/imageproxy/imageproxy.php?img=http://img252.imageshack.us/img252/9145/imagem7yh9.png&key=f1a759d8cad153bb568e377212dec44da001627a0ee9d380f1a7a695ca343aa8" alt="Imagem Postada" />
e depois q eu clico e seleciono ele, ele faz oq devia ter feito sem precisar mexer :
/applications/core/interface/imageproxy/imageproxy.php?img=http://img64.imageshack.us/img64/499/imagem8gb8.png&key=6b68759228f72ae575483f6b0419d806c73b9f77f4b399bbc9c5eb15dd9ff5a0" alt="Imagem Postada" />
o código é esse :
procedure TAbrir.ComboBox1Change(Sender: TObject);var x: integer;beginext:='.';if ComboBox1.Text <> '' then begin ext:=ComboBox1.Text; for x:=1 to Length(ext) do begin if copy(ext,x,1) = '(' then begin ext:=copy(ext,x + 1,5); Break; end; end; end;ShellListView1.Refresh;end;a propriedade itemindex dele ta como 0
oq tem q mexer pra ele funcionar direto?
uma última dúvida, como eu faço para q naum modifiquem o texto dentro do combobox enquanto o programa estiver sendo executado?
é que eu quero fazer essa janelinha personalizada, assim eu posso colocar mais funções além de só abrir o arquivo XD
Hum ... entendo kra ...
vai lah:
pra que não seja alterado o ComboBox, sete a propriedade Style pra csDropDownList ...
No onShow desta sua janela ao inves de deixar a ext como '.', deixe configurado pra mostar somente a extensão que você quiser ... ou ainda tente fazer assim:
ComboBox.onChange(Sender);
Pode seguir algo como o Rodrigo disse, coloca no OnShow a chamada para o Change, algo do tipo:
procedure TForm1.FormShow(Sender: TObject);beginComboBox1Change(Sender);end;
ae funcionou XDoutra coisa, alguém sabe o comando pro botão pra voltar, subir uma pasta e criar uma nova pasta?esse ai eu ainda naum consegui fazer :huh:
deio beleza kra?
pq naum usa o OpenDialog da palheta Dialogs???? pra isto basta setar o filter dele pra extensão que deseja filtrar (*.mdf),,, funciona direitinho ...