Danke Bjoerk.. Nein ist nicht falsch. Laut der Aufgabenstellung!
@ Ralph, Vielen Dank für letztes mal :Ja. Es geht einfach um folgendes Problem : Also meine Funktion tut's ja (Überprüft die einzelne Spalten aber nur wenn ich das eingebe [0,c] oder [1,c]...) Aber wenn ich sie allgemein mache D.h statt
Delphi-Quellcode:
for a:=0 to b-1 do begin
Inhalt_Check:=StringGrid.Cells[0,a]; //...
for c:=a+1 to b-1 do begin
if Inhalt_Check=StringGrid.Cells[0,c] // Erste Spalte überprüfen...
Mit SpaltenNr :
Delphi-Quellcode:
for a:=0 to b-1 do begin
Inhalt_Check:=StringGrid.Cells[SpaltenNr,a]; //Welche Spalte..?
for c:=a+1 to b-1 do begin
if Inhalt_Check=StringGrid.Cells[SpaltenNr,c]
Muss der Funktion die Nummer der Spalte (SpaltenNr) übergegeben werden.
SpaltenNummer wäre wie schon gesagt die Nummer der ComboBoxen in der anderen
Unit. wenn ich was im ComboBox2 auswähle dann ist SpaltenNr = 2 und muss der Funktion übergegeben werden..
Außerdem habe nur ein Prozedur (ComboBoxChangeAlg) für alle
15-ComboBoxen benutzt. D.h bei ComboBox1 die Eingeschaft
'Tag' auf
1 gesetzt und ComboBox2 Tag =2.. damit ich sie über diese Eigenschaft 'Tag' anspreche.. :
Delphi-Quellcode:
procedure TFMRegeln.ComboBoxChangeAlg(Sender: TObject);
begin
Spalte[(Sender as TComboBox).Tag]:=(Sender as TComboBox).Text; // Ausgewählte Text(Funktion) zuweisen...
end;
Wie sage ich (der Funktion) dass SpaltenNr = Wert der Eingeschaft 'Tag' ist ? :
Delphi-Quellcode:
StringGrid.Cells[SpaltenNummer=[(Sender as TComboBox).Tag,c]
Ich möchte die Eingeschaft
'Tag' ausnutzen...übergeben!
LG