Zitat von
Hansa:
Hi,
ich habe ein Stringgrid und die Zahlenzellen sollen da rechtsbündig mit abschließenden Nullen usw. angezeigt werden. Das geht auch. Aber folgendes ist mir noch nicht gelungen : direkt bei der Eingabe eine rechtsbündige Darstellung zu erreichen.
Geht das relativ einfach, oder wird es kompliziert ? Dann bleibt nämlich alles wie gehabt.
Könnte kompliziert werden.
Du brauchst zunächst mal Zugriff auf TStringGrid.
InplaceEditor.
Da dieses Property protected ist muss man tricksen:
Delphi-Quellcode:
type
TSG = class(TStringGrid)
end;
// ein Beispiel, wie man mit einem Timer den Inhalt des Editors verändern kann
procedure TForm1.Timer1Timer(Sender: TObject);
var
sg : TSG;
begin
sg := TSG(StringGrid1);
if Assigned(sg.InplaceEditor) then
sg.InplaceEditor.Text := 'Dummerle';
end;
Wenn du nun dem Editor eine WindowsMessage schickst,
dass er sich rechtsbündig anzeigen soll...