case Verzweigungsproblem

[Mucki]

Hallo. :)
Habe da ein (peinliches) Problem: :oops:

Wert in Stringgrid1.cells [1,1] kann mehrere Werte annehmen (1, 2, 3)
wenn das geschieht, soll stringgrid2.cells [1,1] die unteren Beispiele anzeigen.

So wie im Quelltext geht es aber nicht! :?

Jemand ne Idee/Lösung?

Delphi-Quellcode:

var
x : integer;
begin
stringgrid1.cells [1,1] := inttostr(x);
case x of
 1 : stringgrid2.cells [1,1] := 'Es geht so';
 2 : stringgrid2.cells [1,1] := 'oder so';
 3 : stringgrid2.cells [1,1] := 'oder halt so';
end;

[DGL-luke]

öhm

willst dus niocht so?

Delphi-Quellcode:

var
x : integer;
begin
x := strtoint(stringgrid1.cells [1,1]);
case x of
1 : stringgrid2.cells [1,1] := 'Es geht so';
2 : stringgrid2.cells [1,1] := 'oder so';
3 : stringgrid2.cells [1,1] := 'oder halt so';
end;

[Helmi]

Hallo,

müsste es nicht so heissen:

Delphi-Quellcode:

var
x : integer;
begin
x := StrToInt(stringgrid1.cells [1,1]);      //<===ÄNDERUNG
case x of
1 : stringgrid2.cells [1,1] := 'Es geht so';
2 : stringgrid2.cells [1,1] := 'oder so';
3 : stringgrid2.cells [1,1] := 'oder halt so';
end;

Du hast der Zelle des StringGrid1 den Wert von x zugewiesen - du willst aber x den Wert der Zelle zuweisen.

Dann klappts auch mit dem case

[Mucki]

Jawohl danke, danach habe ich gesucht!!! :wall:

Gruß & einen guten Rutsch,

Mucki

... und vergesst nicht: Raucht nicht so viel trinkt lieber weniger, hi, hi!:drunken:
... weniger ist mehr! :zwinker:

[DP-Maintenance]

Dieses Thema wurde von "Christian Seehase" von "Programmieren allgemein" nach "Object-Pascal / Delphi-Language" verschoben.
Delphi-Problem