StringGrid und Button Funktion

**Alterauge**

OK !

Der Quelltext sieht sauber aus!
Bin die ganze Zeit am überlegen, was hier faul ist.
Oder was meinst Du ?

**DeddyH**

Ich weiß doch nicht, wo der gesuchte Text nun genau in Deinem Grid steht. Spalte 6 der letzten Zeile? So habe ich es zumindest herausgelesen.

**Alterauge**

Richtig! So lese ich es auch!
Aber es passiert nix?

**DeddyH**

Vorschlag:

markieren

Delphi-Quellcode:

			var

  ColIndex: integer;

begin

  ColIndex := StringGrid1.Rows[StringGrid1.RowCount - 1].IndexOf('1');

  if ColIndex > -1 then

    ShowMessage('Zeile enthält "1" in Spalte ' + IntToStr(ColIndex));

Kommt da nix, stimmt die Zeile wohl nicht.

**Alterauge**

da kommt auch nix?

markieren

Delphi-Quellcode:

			 var i: integer;

begin

 i := FormReporting.Report.TopRow-1;

   if FormReporting.Report.Rows[i][5]= '1' then  // lese die letzte Zeile (also die aktuelle zeile) oder nicht?

  begin

   FormMain.AdvGlowButton9.Caption:='test';

  end;

   end;

**DeddyH**

Meinst Du wirklich TopRow?

**Alterauge**

oder
FormReporting.Report.RowCount-1;

**DeddyH**

Hast Du meinen Code aus #14 mal ausprobiert?

**Alterauge**

habe ich! nix passiert!

**DeddyH**

Dann hast Du wohl nicht die richtige Zeile angesprochen. Hast Du mal einen Screenshot von dem Grid?

StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

AW: StringGrid und Button Funktion

Forumregeln

Alterauge Registriert seit: 4. Mär 2011 306 Beiträge Delphi 2010 Professional	#11 AW: StringGrid und Button Funktion 13. Jan 2012, 12:48 OK ! Der Quelltext sieht sauber aus! Bin die ganze Zeit am überlegen, was hier faul ist. Oder was meinst Du ? Geändert von Alterauge (13. Jan 2012 um 12:56 Uhr)
	Zitat

Alterauge Registriert seit: 4. Mär 2011 306 Beiträge Delphi 2010 Professional	#13 AW: StringGrid und Button Funktion 13. Jan 2012, 12:58 Richtig! So lese ich es auch! Aber es passiert nix?
	Zitat

Alterauge Registriert seit: 4. Mär 2011 306 Beiträge Delphi 2010 Professional	#15 AW: StringGrid und Button Funktion 13. Jan 2012, 13:19 da kommt auch nix? markieren Delphi-Quellcode: var i: integer; begin i := FormReporting.Report.TopRow-1; if FormReporting.Report.Rows[i][5]= '1' then // lese die letzte Zeile (also die aktuelle zeile) oder nicht? begin FormMain.AdvGlowButton9.Caption:='test'; end; end;
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#16 AW: StringGrid und Button Funktion 13. Jan 2012, 13:25 Meinst Du wirklich TopRow? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

Alterauge Registriert seit: 4. Mär 2011 306 Beiträge Delphi 2010 Professional	#17 AW: StringGrid und Button Funktion 13. Jan 2012, 13:35 oder FormReporting.Report.RowCount-1;
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#18 AW: StringGrid und Button Funktion 13. Jan 2012, 13:37 Hast Du meinen Code aus #14 mal ausprobiert? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat

Alterauge Registriert seit: 4. Mär 2011 306 Beiträge Delphi 2010 Professional	#19 AW: StringGrid und Button Funktion 13. Jan 2012, 13:54 habe ich! nix passiert!
	Zitat

DeddyH Registriert seit: 17. Sep 2006 Ort: Barchfeld 27.542 Beiträge Delphi 11 Alexandria	#20 AW: StringGrid und Button Funktion 13. Jan 2012, 13:55 Dann hast Du wohl nicht die richtige Zeile angesprochen. Hast Du mal einen Screenshot von dem Grid? Detlef *"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen."* (Albert Einstein) Dieser Tag ist längst gekommen
	Zitat