Einzelnen Beitrag anzeigen

taaktaak

Registriert seit: 25. Okt 2007
Ort: Radbruch
1.990 Beiträge
 
Delphi 7 Professional
 
#9

Re: Caret in TEdit /TComboBox an X/Y - Position setzen

  Alt 4. Sep 2008, 20:14
Du hast das Handle der Combobox übergeben, du benötigst aber das Handle des eingebetteten Edits. Daher funktioniert das nicht.

Der Vorfahr TCustomCombo kennt dieses Handle, schau mal in den Source - es ist dort allerdings als "protected" deklariert. Deswegen kannst du in TComboBox nicht darauf zugreifen. Du kannst jetzt z. B. eine eigene Combobox ableiten, das EditHandle darin veröffentlichen "public" und dann natürlich benutzen.

Delphi-Quellcode:
type tMyCombo = class(TCustomCombobox)
                  public
                    property EditHandle;
                  end;

procedure Tfo~~.FormShow(Sender:TObject);
var cb :tMyCombo;
begin
  cb:=tMyCombo.Create(Self);
  cb.Parent:=Self;
  cb.Top :=200;
  cb.Left :=400;
  cb.Text :=IntToStr(cb.EditHandle); // << das ist das Edit-Handle
  // ..
end;
Das ist natürlich nur ein Beispielschema ...
Ralph
  Mit Zitat antworten Zitat