Hallo zusammen,
habe da mal ein Frage zu Enums.
Ich definiere ein Enum wie folgt:
Code:
type
TOrderField = (ofBelegnummer=4, ofBelegdatum=6, ofKonto, ofKontoName, ofBank, ofZahldatum);
var
OrderField: TOrderField = ofBelegnummer;
Die Nummerierung mache ich deshalb so, weil dies den Spalten einer Tabelle entspricht, die ich sortieren möchte.
Beim Klick auf die Überschriften weise ich der Variablen OrderField die Spalte zu:
Code:
procedure TfrmMain.sgOPOSFixedCellClick(Sender: TObject; ACol, ARow: Integer);
begin
if OrderField = TOrderField(ACol) then OrderASC := not OrderASC else OrderField := TOrderField(ACol);
btnRefresh.Click;
end;
Im Nachgang wird die Tabelle neu gefüllt (aus einer Datenbank) mit einer entsprechenden Sortierung.
Das funktioniert prima, solange man auf eine Spalte klicke, die auch im Enum vorhanden ist.
Ich würde jetzt gerne abfragen, ob denn die Spalte im Enum vorhanden ist.
Irgendwie so:
Code:
if ACol IN TOrderField then
Das funktioniert aber leider nicht...
Hat von euch jemand eine Idee dazu?
Schonmal herzlichen Dank
Grüße
P.S. Nein ich kann kein DBGrid verwenden, das die Sortierung von Haus aus kann...
