Fehlermeldung Ordinaltyp erforderlich

[Ralf vGT]

Hallo da ,

Ich versuche eine eigene Datenbank zu schreiben und sitze seit einiger Zeit fest, da ich gerne ein DBGrid durch anklicken der unterschiedlichen Title sortiert anzeigen möchte. Hier die ausgedachte Prozedure

procedure TSchlag.DBGrid1TitleClick(Column: TColumn);
begin
case DbGrid1.Columns of

0 : TSchlag.IndexName := 'Nr' ;

1 : TSchlag.IndexName := 'Schlagname' ;

Fehlermeldung Ordinaltyp erforderlich

Wo liegt mein Fehler ?? Wie sollte ich welchen Typ umwandeln? oder gibts eine einfachere Lösung ?

Ralf

[Olaf Steffan]

Hallo Ralf,<BR><BR>CASE erwartet einen Ordinaltyp, DbGrid1.Columns ist allerdings vom Typ TDBGridColumns. Versuche doch einmal folgendes: <BR><BR>var iFieldNr : Integer; ...<BR>...<BR>iFieldNr := DbGrid1.SelectedIndex;<BR>
case iFieldNr of<BR>0 : TSchlag.IndexName := 'Nr' ;<BR>1 : TSchlag.IndexName := 'Schlagname'; ...usw.<BR><BR>Wenn der Index so heißt wie der Spaltenname, dann ist es noch einfacher:<BR><BR>TSchlag.Indexname := Column.Fieldname;<BR><BR>Ich hoffe, das hilft.<BR><BR>Viele Grüße Ola

[Ralf vGT]

Hallo Olaf,

vielen Dank für den Rat,da ich ja noch ein Anfänger bin ,bin ich froh wenn mir jemand sagt wie es laufen kann.

Gruß Ral