Mehrzeiliges EditFeld

[Tommy1988]

Guten Tag,

ich habe eine Frage;
wie kann ich ein Editfeld Mehrzeilig machen?

Also das ist so, klicke auf einen Button dann wird der Inhat versch. Variablen
ins Edit geschrieben. Sollte aber Mehzeilig sein.

Warum ich kein Memo nehme?

Das Memo hat nicht die Designeinstellungen wie das Edit das ich verwende.

[CCRDude]

Imho gibt es auf WinAPI-Ebene da ein Flag, das man für Mehrzeiligkeit setzen kann. Versuche mal, ein ES_MULTILINE hinzuzufügen (siehe auch GetWindowLong/SetWindowLong bzw deren Nachfolger).

[Tommy1988]

"ES_MULTILINE"

Leichter gesagt als getahn,

- wie
und
- wo hinzufügen?

[Keldorn]

Hallo du kannst createparams überschrieben, müßtest dazu aber dir eine eigene Kompo erstellen (Denke ich zumindestens). Das Spinedit z.B. macht das auch.

Delphi-Quellcode:

procedure TEdit???.CreateParams(var Params:TCreateParams);
begin
  inherited createParams(Params);
  Params.Style:=params.Style or ES_MULTILINE;
end;

Mfg Frank

[Tommy1988]

Geht nicht

procedure TEdit2.CreateParams(var Params:TCreateParams);
begin
inherited CreateParams((Params);
Params.Style := params.Style or ES_MULTILINE;
end;

Wieso TEdit2 da oben kommt da nicht Tform oder sowas hin?

[Keldorn]

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?

[turboPASCAL]

Ein mehrzeiliges Editfeld ist ein Memo in der Delphi - VLC. Ein Umbauen eines Edits währe
unnötiger Zeitaufwand.