Schleifenfrage

[Paella]

Hai Users!
Stehe vor einem Problem, möchte etwas realisieren!
Hier ein Beispiel:

1.Wert = 1; 2.Wert = 2; 3.Wert = 3; 4.Wert = 1 bis 9;

1., 2. und 3. Wert bleiben immer gleich. Nur Wert 4 soll 1 bis 9 fortlaufend sein.

Das heißt, Die Zeile muß 9 Mal durchlaufen werden,
wobei der 4.Wert 1 bis 9 annimmt!

Kein Problem!
Na dann schreib mir

Gruß Paella

 

[Navy]

Irgendwie versteht ich nicht was Du willst. Du möchtest also 4 Variablen, wobei 3 davon fest stehen und die 4. kann einen von 9 Werten bekommen? Diesen letzten Wert ziehst Du dann aus einem Text/Zeile?

 

[Paella]

Hi Navy

Also es geht um folgendes:

Ich möchte ein Gerät auslesen über die RS232.

Nun hat dieses Gerät aber mehrere Parameter,
deren Werte ich wissen möchte.

Das zu sendende Telegram bleibt bis auf das
Parameternummer Byte (4.Wert im Beispiel) immer gleich.

Gruß Paella

 

[Navy]

type Dataset = record
  data : array [1..3] of byte;
  data4 : array[1..9] of byte;
end;

function read : Dataset;
var
  lauf : integer;
  ergebnis : Dataset;
begin
  for lauf := 1 to 3 do
    ergebnis.data[lauf] := $AUFRUF;
  for lauf := 1 to 9 do
    ergebnis.data4[lauf] := $AUFRUF;

  result := ergebnis;
end;

So hab ich Dich jetzt verstanden.

 

[Paella]

Hmmmm, ich bin mir bei der Lösung nicht ganz sicher!

Also ich meine, das Telegram sieht so z.B. aus:

10 65 32 104

da der 4.Wert jedoch von 1 bis 104 geht möchte ich folgendes senden:

10 65 32 1
10 65 32 2
10 65 32 3
10 65 32 4
10 65 32 5
10 65 32 6
10 65 32 usw bis ...104

x := 1
data4 := x+1 < 104 irgendwie so, oder?

Gruß Paella