Thema: Delphi Minesweeper

Einzelnen Beitrag anzeigen

Benutzerbild von Mavarik
Mavarik

Registriert seit: 9. Feb 2006
Ort: Stolberg (Rhld)
4.130 Beiträge
 
Delphi 10.3 Rio
 
#14

AW: Minesweeper

  Alt 22. Mär 2015, 23:24
Macht es Sinn über Self.Compenents auf die Panels zuzugreifen?
Hast Du eigentlich meine Antwort gelesen?

Delphi-Quellcode:
procedure TForm1.CannonFire(var A,B,m:integer); //Procedure für Linksklick
var h,j:integer;
begin
if mf[A,B]<>9 then //Falls keine Minen...
  begin
   m:=mf[A,B];
   if mf[A,B]=0 then
     begin
       h:=A;
...
OMG... Was für ein Codemonster...

Warum auch immer Du unbedingt 10000 Zeilen tippen willst, wenn es auch in 25 geht...
  Mit Zitat antworten Zitat