Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
Delphi XE3 Enterprise
|
AW: Edit leert sich bei Enter
12. Jan 2013, 17:50
es wird nicht leer, sondern es bricht um... mit Pfeil auf/ab kannst Du scrollen.
wenn Du das nicht willst, musst Du Deine CreateParams ändern.
Delphi-Quellcode:
procedure TAlignLabeledButtonEdit.CreateParams(var params: TCreateParams);
const
Alignments: array[TAlignment] of Word = (DT_LEFT, DT_RIGHT, DT_CENTER);
begin
// Geerbte Parameter setzen
params.Style := (params.Style or Alignments[FAlignment] or WS_CLIPCHILDREN) and not ES_MULTILINE;
inherited CreateParams(params);
end;
Thomas Wassermann H₂♂ Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂♂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
Geändert von Bummi (12. Jan 2013 um 17:54 Uhr)
|