Hallo delphin,
verschiebe einmal die Zuweisung zu Edit1.Visible
vor das Setzen der Position bzw. Höhe. Vielleicht solltest du dem Editfeld auch noch den Fokus geben:
Delphi-Quellcode:
procedure TForm1.CheckListBoxDblClick (Sender: TObject);
Var
DrawRect : TRect;
begin
DrawRect := CheckListBox.ItemRect(CheckListBox.ItemIndex);
Edit1.Text := CheckListBox.Items.Strings[CheckListBox.ItemIndex];
Edit1.Visible := True; // neu
Edit1.Top := DrawRect.Top;
Edit1.Height := DrawRect.Bottom - DrawRect.Top + 2; //Zeile: *2
// Edit1.Visible:=true; // entfernt
Edit1.SetFocus; // neu
end;
Gruß Hawkeye