Schiffe versenken programmieren

[Mavarik]

Mit schönem Gruß von uns alle an Deinen Informatik-Lehrer.

Er möge sich hier mal einloggen, damit wir Ihn mal so richtig durch den Wolf drehen können...

OK... Wie mache ich aus einem Array ein Spielfeld...

Delphi-Quellcode:

Var
  Feld : Array ['A'..'B',1..2] of Integer;

Spielfeld;

AB
1..
2.o

Initialisierung:

Delphi-Quellcode:

begin
  Feld['A',1] := 0; // Wasser
  Feld['A',2] := 0; // Wasser
  Feld['B',1] := 0; // s.o.
  Feld['B',2] := 1; // U-Boot
end;

Schuss:

Gegeben sind 2 Edit Felder. 1x für die Spalte "A..B" ('L' in Deinem Fall) 1x für die Reihe

Delphi-Quellcode:

var
  Spalte : Shortstring; // eigentlich auch ein "Array" ;-)
  Reihe  : Integer;
begin
  Spalte := copy(Uppercase(trim(Edit1.Text)),1,1);
  Reihe  := Strtoint(trim(Edit2.Text));

  if Feld[Spalte[1],Reihe] = 0 then
    // Ausgabe "Wasser"
    else // Ausgabe "Treffer"
end;

Verstanden?

Mavarik

PS.: 120 Nachtrichten für so ein kleines Thema... Klingt langsam wie ein Wettbewerb... Wer Programmiert Schiffe-Versenken mit den wenigsten Zeilen Source-Code... Müssen nur noch die Rahmenbedingungen festlegen...

[p80286]

[OT]

Zitat von Mavarik:

Mit schönem Gruß von uns alle an Deinen Informatik-Lehrer.
Er möge sich hier mal einloggen, damit wir Ihn mal so richtig durch den Wolf drehen können...

Und ich dachte immer zum Lernen gehören zwei, einer der lehrt und einer der lernt

Gruß
K-H
[/OT]

[Sir Rufo]

Zitat von p80286:

[OT]

Zitat von Mavarik:

Mit schönem Gruß von uns alle an Deinen Informatik-Lehrer.
Er möge sich hier mal einloggen, damit wir Ihn mal so richtig durch den Wolf drehen können...

Und ich dachte immer zum Lernen gehören zwei, einer der lehrt und einer der lernt

Gruß
K-H
[/OT]

Wenn Bauer mit Badehose nicht schwimmen kann, dann sagt der Bauer "Liegt an der Badehose" und die Hose "Liegt am Bauern".
Das Wasser sagt "Mir doch egal wer Schuld ist"

[Mavarik]

Zitat von p80286:

[OT]

Zitat von Mavarik:

Mit schönem Gruß von uns alle an Deinen Informatik-Lehrer.
Er möge sich hier mal einloggen, damit wir Ihn mal so richtig durch den Wolf drehen können...

Und ich dachte immer zum Lernen gehören zwei, einer der lehrt und einer der lernt

Gruß
K-H
[/OT]

[OT]Ach Du bist sein Lehrer? ...

Hast natürlich recht, aber das ist doch auch die Aufgabe eines Lehrers den Stoff so zu vermitteln, dass der Schüler Ihn versteht. So eine Aufgabe "Programmier mal Schiffeversenken" kommt ja nicht von 0 auf 100.
Das Thema wurde doch sicherlich aufgebaut...
König Dodon und das Array of Boolean...usw.
[/OT]

[Mavarik]

Zitat von Sir Rufo:

Wenn Bauer mit Badehose nicht schwimmen kann, dann sagt der Bauer "Liegt an der Badehose" und die Hose "Liegt am Bauern".
Das Wasser sagt "Mir doch egal wer Schuld ist"

Du hast "was" vergessen...

[leodinho]

Ich bekomme es aber nicht auf meine Form übertragen /:

[leodinho]

Zitat:

Wenn du das Spielfeld anzeigen willst, dann gibst du abhängig vom Wert eben das passende heraus

Wie bekomm ich das Spieldfeld nun ausgegeben? syntaktisch habe ich keine fehler aber sobald ich auf den button klicke habe ich ein error /:

[Mavarik]

Zitat von leodinho:

Ich bekomme es aber nicht auf meine Form übertragen /:

Hä?

Was von wo nach wo? Kannst du bitte deine Frange etwas ausführlicher stellen?

[Mavarik]

Zitat von leodinho:

Zitat:

Wenn du das Spielfeld anzeigen willst, dann gibst du abhängig vom Wert eben das passende heraus

Wie bekomm ich das Spieldfeld nun ausgegeben? syntaktisch habe ich keine fehler aber sobald ich auf den button klicke habe ich ein error /:

Welchen error? Welchen sourcecode? Meine Glaskugel will gerade nicht so richtig...

[Klaus01]

.. das kommt ja auch erst später...

Ein Array ist ein nicht visuelles Element.

Ein StringGrid/DrawGrid kannst Du zum anzeigen verwenden.

Das Array ist zur Datenhaltung gedacht.
Das StringGrid/DrawGrid zur Anzeige der Daten.

Im Prinzip musst Du nach jeder Aktion ducht das Array wandern
und anhand der Daten das StringGrid/DrawGrid füllen.

Grüße
Klaus