Daten in StringGrid Tabelle einfügen

[Black-Rider]

Hallo,
wir sollen über das Wochenende in Programmiern ein Programm in Delphi schreiben zur Umwandlung der Temp. zwischen Celsius und Fahrenheit. Dabei gab es einige Vorgaben, was man beachten musste. Und an einer Vorgabe hab ich ein Problem. Nämlich das Ergebnis in eine Tabelle einfügen. Ich habe mich für die StringGird Tabelle entschieden.
Habe unter Cells in der Delphi Hilfe auch schon ein Bsp. gefunden nur irgentwie hat das nicht funktioniert. Kann mir jemand sagen, wie ich Daten in einer StringGrid Tabelle machen kanm, oda mir das einfach richtig hinschreiben:

Delphi-Quellcode:

procedure TForm1.RG_UmrechnungsartClick(Sender: TObject);
var
  Umrechnungsart        : Integer;
  Anfangswert,
  Endwert,
  Ergebnis              : Real;

begin  // RG_UmrechnungsartClick
  Umrechnungsart:= RG_Umrechnungsart.ItemIndex * 1;
  if (Umrechnungsart = 0)
  then begin // Umrechnung Celsius Fahrenheit

         // ((C*9)/5)-32
         while Anfangswert <= Endwert do
         begin // Begin While Schleife

           Ergebnis := ((Anfangswert*9)/5)-32;
//Hier dann Ausgabe in der String Grid Tabelle hin
           Anfangswert := Anfangswert + 1;

         end;  // End While Schleife

       end  // Umrechnung Celsius Fahrenheit

  else begin // Umrechnung Fahrenheit Celsius

         // (F-32)*5/9
         while Anfangswert <= Endwert do
         begin // Begin While Schleife

           Ergebnis := (Anfangswert-32)*5/9;
// hier dann ausgabe in der String Grid Tabelle hin
           Anfangswert:= Anfangswert +1 ;

         end; // End While Schleife

       end; // Umrechnung Fahrenheit Celsius

end;  // RG_UmrechnungsartClick

Da wir eine Tabelle noch nie in der Schule hatten, weiß ich echt nicht wie´s geht.

Danke schonmal für eure Hilfe!


MFG
Black-Rider

[sirius]

Ich würde eher einen ValueListEditor nehmen.

Da kannst du dann schreiben:
valuelisteditor1.InsertRow(floattostr(Anfangswert),floattostr(Ergebnis),true);

[Black-Rider]

Hmm, das würde ich dann als 2. Lösung nehmen, aber StringGrid wäre besser, weil unser Lehrer meint wir müssen die auch können.


Dann ma ne Frage zum ValueListEditor
Unter welcher Eigenschaft finde ich Schlüssel udn Wert, wenn ich den in meine Form einbau steht obern immer drüber Wert und Schlüssel, würde ich aber gerne durch Celsius und Fahrenheit ersetzen!


Danke schonma dafür !

MFG
Black-Rider

[shmia]

Ich würde an deiner Stelle erst mal eine Procedure schreiben, die in einem Stringgrid
ab einer bestimmte Zeile Platz schafft.
Prinzip:
Stringgrid.RowCount := Stringgrid.RowCount + 1; // um eine Zeile verlängern
Schleife von Rowcount downto Einfügeindex laufen lassen
und Zeile kopieren (Stringgrid1.Rows[i].Assign(Stringgrid1.Rows[i-1]) ).

[andyvdeu]

Hallo Black-Rider, einen Stringgrid füllst Du z.b. so:

Delphi-Quellcode:

   with Stringgrid1 do
      begin
        //..0 = Col / i = Row
        Cells[0, i] := FormatCurr('0,00', Anfangswert);
        Cells[1, i] := FormatCurr('0,00', Ergebnis);
       end;
       inc(i);

vielleicht hilft das ein wenig.

[Black-Rider]

Danke das geht, nun nur noch die Frage, wie kann ich alle Inhalte wieder löschen?

[DeddyH]

Die Zeilen oder nur die Inhalte?

[andyvdeu]

Schau mal hier :

www.ansatheus.de

in dem Tutorial unter "Zeile löschen"
vielleicht ist das was Du suchst.

[sirius]

Zitat von Black-Rider:

Dann ma ne Frage zum ValueListEditor
Unter welcher Eigenschaft finde ich Schlüssel udn Wert, wenn ich den in meine Form einbau steht obern immer drüber Wert und Schlüssel, würde ich aber gerne durch Celsius und Fahrenheit ersetzen!

Eigenschaft: TitleCaptions