InplaceEdit im TDBGrid und Zahlen rechts ausrichten

**Gremlin**

Hallo,

ich möchte in meiner Ableitung des TDBGrids über den InplaceEditor die Zahlen rechtsbündig eingeben. Dies klappt auch ganz hervorragend, wenn nicht der Text (die Zahl) umbrechen würde, wenn die Spalte kleiner als der anzuzeigende Text ist

Dies kann man dann erkennen, wenn man mehrere Zeilen pro Datensatz einstellt

zusammenfalten · markieren

Delphi-Quellcode:

			function TMyGrid.CreateEditor: TInplaceEdit;

begin

  Result := TMyGridEditor.Create(self);

end;

procedure TMyGridEditor.CreateParams(var Params: TCreateParams);

const

  Alignments : array[TAlignment] of LongWord= (ES_Left, ES_Right, ES_Center);

begin

  inherited CreateParams(Params);

  Params.Style := Params.Style or Alignments[FAlignment];

end;  

procedure TMyGridEditor.SetAlignment(Value: TAlignment);

begin

  if (FAlignment <> Value) then begin

    FAlignment := Value;

    RecreateWnd;

  end;

end;

Es hat auch nichts gebracht, über CreateParams den Style ES_MULTILINE bei Zahlen herauszunehmen, da anschließend der Editor immer oben links in der Ecke der Zelle erscheint

Leider weiss ich momentan nicht weiter, vielleicht hat jemand eine Idee oder schon damit mehr Erfahrungen wie ich gesammelt.
Vielen Dank

InplaceEdit im TDBGrid und Zahlen rechts ausrichten

InplaceEdit im TDBGrid und Zahlen rechts ausrichten

Stichworte

Forumregeln