Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
8. Jan 2010
Der aufruf der Sortiermethode durch diesen Code funktioniert auch
wenn die Spalten gescrollt wurden.
procedure TForm1.StringGrid1MouseUp(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
var
col, row: Integer;
begin
if button = mbright then
begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
8. Jan 2010
Hallo,
ja da habe ich es falsch verstanden.
Mit folgendem Code habe ich in einem Projekt das StringGrid sortieren lassen.
Die Methode hat auch funktoniert wenn das StringGird horizontal gescrollt war.
Die SpaltenNummern der Spalteköpfe ändert sich ja durch das scrollen nicht.
procedure TForm1.SortStringGrid(GenStrGrid: TStringGrid; ThatCol: Array of Integer);
const
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Klaus01,
8. Jan 2010
Hallo,
so weit ich das überschaue, wird die gesamte Spalte sortiert
und nicht nur der Teil der gerade sichtbar ist.
Grüße
Klaus