Wenn . dann Fenster öffnen wie bei Delphi

[Christian18]

Hallo,

ich habe eine RichEdit1 Komponennte auf meiner Form. Wenn ich einen Punkt eingebe, dann soll ein Fenster auf gehen. Wie bei Delphi auch. Wie mache ich das. Ich habe echt keine Idee. Was brauche ich für Komponnenten dazu.

[Sharky]

Zitat von Christian18:

... Wenn ich einen Punkt eingebe, dann soll ein Fenster auf gehen. Wie bei Delphi auch....

Was für ein Fenster geht denn bei Delphi auf wenn ich irgendwo einen Punkt eingebe?

[static_cast]

Hi,

ich hatte es mal so gelöst:

Nimmst ein Timer stellst ihn auf Interval = 500, guckst in deinem Memo oder RichEdit ob ein Punkt gedrückt wurde und sagt dem Timer Enabled = True, oder wenn noch eine Taste gedrückt wird wieder False.

und im OnTimer kannst du dein Code ausführen zum Fenster anzeigen.

[static_cast]

Zitat von Sharky:

Zitat von Christian18:

... Wenn ich einen Punkt eingebe, dann soll ein Fenster auf gehen. Wie bei Delphi auch....

Was für ein Fenster geht denn bei Delphi auf wenn ich irgendwo einen Punkt eingebe?

Er meint sicher das Code-Completion fenster

[Christian18]

ja genau das Fenster Code ... was will ich auch so haben. Wie mache ich das???

[Sharky]

Zitat von Christian18:

...Wie mache ich das???

Eigentlich hat static_cast schon alle Stichwörter geliefert

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Timer1.Interval := 500; // Halbe Sekunde verzögerung
  Timer1.Enabled := False;
end;

procedure TForm1.RichEdit1KeyPress(Sender: TObject; var Key: Char);
begin
  if (key = '.') then  // Es wurde ein Punkt eigegeben
  begin
    Timer1.Enabled := True;
  end
  else
  begin
    Timer1.Enabled := False;
  end;
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
  Timer1.Enabled := False;
  ShowMessage ('blubb'); // Hier kommt der Aufruf für dein "Code-Fenster" hin
end;

[Christian18]

ok das habe ich jetzt !

was für ein Fenster für den Code würdet ihr dort nehmen??? eine ListBox1????

und wie bekomme ich von den Code Fenster dann die obere linke ecke an den punkt???

[Sharky]

Zitat von Christian18:

...und wie bekomme ich von den Code Fenster dann die obere linke ecke an den punkt???

Schaue Dir mal TRichEdit.CaretPos an.

[static_cast]

Zitat von Christian18:

was für ein Fenster für den Code würdet ihr dort nehmen??? eine ListBox1????

Eine ListBox ist nicht unbedingt sehr zu empfehlen, sie kann nicht ausserhalb des Forms angezeigt werden, du solltest zu anfang eine einfache Form anzeigen lassen, und später versuchen es über eine ableitung der THint klasse zu lösen.

[static_cast]

Ich hab dir mal was zusammen geschustert, ist wirklich nur kurz und knapp, aber es sollte dir helfen.