Hallo Leute,
ich will einen Ordnerauswahl-Dialog bauen, bei dem der Ok-Button disabled wird, wenn der/die Anwender/in einen leeren Ordner auswählen will.
Dazu benutze ich die Komponente PathDialog von Florian Bömers. Diese funktioniert ansonsten gut wie SelectDirectory hat aber zusätzlich die Funktion setOkButton(enabled: Boolean)
Delphi-Quellcode:
function TPathDialog.setOKButton(enabled:Boolean):Boolean;
begin
result:=false;
if (FHandle<>0) then
begin
result:=true;
if enabled then
SendMessage(FHandle,BFFM_ENABLEOK,1,0)
else
SendMessage(FHandle,BFFM_ENABLEOK,0,0);
end;
end;
Ausgelöst wird diese Routine im Event OnSelect - ein Ordner wird angeklickt.
Ich muss aber feststellen, sobald ich setOkButton einbaue, ist der
Ok-Button immer disabled.
Gruß Willie
Dann noch ein Hinweis, ich hatte es früher hier schonmal erwähnt. Durch einen Augenerkrankung kann ich nur mit einen Lupensoftware programmieren. Ich bitte um Nachsicht und Rücksicht. Danke.