nonVCL: Suchen

[Alexander]

Hi Leute,
ich bin jetzt auch auf dem nonVCL-Trip und programmier gerade einen einfachen Notepad-Clone, bin auch schon fast fertig.
Jetzt bin ich gerade dabei eine Suchfunktion zu erstellen. Den Dialog habe ich schon hinbekommen. Doch wie bekomme ich den eingegebenen Suchstring heraus?

Delphi-Quellcode:

function searchdlg(wnd : hwnd):Boolean;
var
  szFindWhat : PChar;
begin
  finddlg.lStructSize := sizeof(finddlg);
  finddlg.hwndOwner := wnd;
  finddlg.lpstrFindWhat := szFindWhat;
  finddlg.wFindWhatLen := 80;
  finddlg.Flags := 0;

  FindText(finddlg);
end;

so erstelle ich mir den Suchen-Dialog. Und wie geht es weiter`?