Delphi Auswahlbox, wie die Codevervollständigung

Thema durchsuchen

Ansicht

Themen-Optionen

Auswahlbox, wie die Codevervollständigung

Ein Thema von xZise · begonnen am 11. Feb 2007 · letzter Beitrag vom 11. Feb 2007

Vorheriger Beitrag

Nächster Beitrag

Matze

(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge

Turbo Delphi für Win32

#16

Re: Auswahlbox, wie die Codevervollständigung

11. Feb 2007, 20:52

Moin,

eben schnell zusammengetippt und kompiliert, da tut's soweit. Es kann sein, dass du das noch etwas anpassen musst:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TForm1.Memo1Change(Sender: TObject);

var

  CaretPos: TPoint;

begin

  GetCaretPos(CaretPos);

  with Sender as TMemo do

    CaretPos := ClientToParent(CaretPos);

  with ListBox1 do

  begin

    Left := CaretPos.X + 3;

    Top := CaretPos.Y - Memo1.Font.Height + 3;

  end;

end;