Czy możliwe jest programowe wpisanie tekstu do FindDialog gdy ten już jest wyświetlony (tzn. po wywołaniu FindDialog.Execute) ? Przypisuje wartość do FindText ale nic sie nie dzieje. Może da się to zrobić jakoś w WinApi ale u mnie z tym krucho :(
Cały pomysł to wpisywanie tekstu do już wyświetlonego FindDialog w zdarzeniu OnDblClick komponentu TSynMemo gdy jakis tekst został zaznaczony.
Pozdrawiam,
albi
moze mozna inaczej ale to pierwsze, co mi wpadlo do glowy.
proste a co najwazniejsze dziala:
procedure TForm1.Button2Click(Sender: TObject);
var H:THandle;
begin
H:=FindDialog1.Handle; //pobierasz Handle okna...
H:=FindWindowEx(H,0, 'Edit', nil); //znajdujesz Handle edita, lezacego na oknie...
SetWindowText(H, 'Tutaj wpisz, co chcesz'); //Wklepujesz do edita swoj text...
end;
pozdro [browar]
Dzięki! Dokładnie o to chodziło.
Zarejestruj się i dołącz do największej społeczności programistów w Polsce.
Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.