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
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