Thema: Delphi Mehrzeiliges EditFeld

Einzelnen Beitrag anzeigen

Keldorn

Registriert seit: 6. Mär 2003
Ort: Meißen
876 Beiträge
 
Delphi 10.1 Berlin Professional
 
#6

Re: Mehrzeiliges EditFeld

  Alt 17. Mai 2007, 15:43
doch doch, geht schon, du mußt es dir aber als eigene komponente bauen

Delphi-Quellcode:
type
  TEditMultiLine = class(TEdit)
  private
  protected
    procedure CreateParams(var Params:TCreateParams);override;
  public
  published
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples', [TEditMultiLine]);
end;

{ TEditMultiLine }

procedure TEditMultiLine.CreateParams(var Params: TCreateParams);
begin
  inherited createParams(Params);
  Params.Style:=params.Style or ES_MULTILINE;
end;
//create auch noch überschreiben und autosize auf false stellen, sonst machst keinen Sinn
edit: und welche Eigenschaften fehlen Dir beim Memo?

Lükes Grundlage der Programmierung:
Es wird nicht funktionieren
(Murphy)
  Mit Zitat antworten Zitat