Statt StingGrid einzelne Bitmaps verwenden -> Zählschleife?

Die-Kackhummel · Hält's aus hier Beiträge: 6

EInen wunderschönen guten Abend

Ich muss für ein Schulprojekt etwas wie Schach bzw. 4-Gewinnt programmieren, dabei kann ich allerdings kein StingGrid verwenden (Was sich für Kontrollzählschleifen lohnen würde), sondern repräsentiert bei mir ein einzelnes Bitmap eine Zelle in einer 5x5 Matrix.

Nun meine Frage: Wie kann ich die Bitmap-Bezeichnungen alle in Zählschleifen integrieren, angenommen sie sind dem Platz im Raster entsprechend nummeriert (wie Bild11, Bild12, Bild13, Bild21, Bild22 etc)? Kann mir da evt. jemand weiterhelfen?

Benutze Delphi7, bitte möglichst einfach eLösungsvorschläge da ich mit Delphi für gewöhnlich nichts am Hut habe

MfG, Die-Kackhummel

Moderiert von Christian S.: Topic aus Sonstiges (Delphi) verschoben am So 29.03.2009 um 00:34

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Hallo und

!

Du kannst zum einen Suche in: Delphi-Forum, Delphi-Library

"FINDCOMPONENT" benutzen oder aber einen Ansatz wie diesen hier nur mit einem zwei-dimensionalen Array.

Grüße
Christian

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

Kawa · Beiträge: 45 Erhaltene Danke: 1

Hallo,
hier ist ein Dateianhang, Online Schach Spiel.
Vieleicht kann du ja was anfangen!

Einloggen, um Attachments anzusehen!

Die-Kackhummel · Hält's aus hier Beiträge: 6

Okay danke für die Antworten, habs hinbekommen

Allerdings hätte ich da noch eine weitere Frage (die Hilfe in Delphi kan ich nicht benutzen, da ich Delphi7 unter Vista verwende und da kommt es zu Problemen, weil irgendeine Datei für die Hilfe in Vista fehlt o.ä.)

Und zwar würde ich gerne wissen wie man die Zeit stoppt ohne den Programmablauf zu unterbrechen. Eine delay-FUnktion hab ich bereits integriert

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

procedure delay(ms:Integer);
var Start: Integer;
begin
 Start := GetTickCount;
 repeat
 Application.ProcessMessages;
 until GetTickCount-Start > ms;
end;

allerdings nützt mi die ja nichts weil man parallel dazu keine anderen Prozeduren ausführen kann.

GIbt es eine einfache Methode Zeit zu messen und in einer Variablen zu speichern?

Moderiert von Christian S.: Delphi-Tags hinzugefügt

FinnO · Verfasst: So 29.03.09 10:31

getTickCount() liefert die Zeit zurück, die seit dem Start von Windoof vergangen ist in ms. Zeit messen kannst du dann so

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

var
  Start : Integer;
begin
  Start := GetTickCount;

  doSomething

  Showmessage(IntToStr(GetTickCount - Start));
end;

Christian S. · Beiträge: 20451 Erhaltene Danke: 2264 Win 10 C# (VS 2019)

Hallo!

Bitte erstelle für jede Frage immer ein neues Topic. Dann kannst Du diese in der richtigen Sparte unterbringen und auch mit einem passenden Titel versehen. Danke :-)

Grüße
Christian

P.S.: Zur Delphi 7-Hilfe unter Vista: www.delphi-library.d...tallieren_89408.html

_________________
Zwei Worte werden Dir im Leben viele Türen öffnen - "ziehen" und "drücken".

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme