Hi,
hab ein kleines Problem warum geht dieses nicht?
Er macht gleich die Form größer wenn ich das Programm starte.
Delphi-Quellcode:
procedure TForm1.Timer4Timer(Sender: TObject);
begin
if SearchForText_AndSelect(RichEdit1, 'Whisper') then
label33.caption := 'You Got A Whisper';
form1.Width := 952;
end;
wenn ich es so schreibe
Delphi-Quellcode:
procedure TForm1.Timer4Timer(Sender: TObject);
begin
SearchForText_AndSelect(RichEdit1, 'Whisper')
end;
funktioniert das. Und das Wort wird auch markiert.