takze zdravim.. mam mensi problem z tvorbou niektorych programov, ktore nam zadal nas prednasajuci, ze si ich mame spravit pred skuskou..
takze 1. program
http://www.salanci.sk/C/Skuska2/index.html
tento program som nevedel ani inicializovat s textoveho suboru a vykreslit do imagu..
ak by bol niekto taky dobry a vedomosti chtivy tak by mi to mohol vysvetlit
program c.2
http://www.salanci.sk/C/Skuska2/index.html
tento program som vedel precitat s textaku aj vykreslit do imagu, ale menej uspesny som bol pri programovani funkcii, ktore mali zabezpecit priebeh hry..
môj kód :
//---------------------------------------------------------------------------
#include <vcl.h>
#include <fstream.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
struct TPolicko
{ bool JeObsadene;
char znak;
};
TPolicko pole[10][10];
int stav,PrveX,PrveY;
void Precitaj()
{int x,y;
char c;
ifstream f;
f.open("plocha.txt");
for (y=0;y<=9;y++)
{for (x=0;x<=9;x++)
{f.get(pole[y][x].znak);
if (pole[y][x].znak!=' ') pole[y][x].JeObsadene=true;
else pole[y][x].JeObsadene=false;
}f.get(c);
}
}
void Kresli()
{int x,y;
for (y=0;y<=9;y++)
{for (x=0;x<=9;x++)
if (!pole[y][x].JeObsadene) {Form1->Image1->Canvas->Brush->Color=clWhite;
Form1->Image1->Canvas->Rectangle(x*30,y*30,x*30+30,y*30+30); }
else { Form1->Image1->Canvas->Brush->Color=clYellow;
Form1->Image1->Canvas->Rectangle(x*30,y*30,x*30+30,y*30+30);
Form1->Image1->Canvas->TextOut(x*30+15,y*30+15,pole[y][x].znak);
}
}
}
bool JePrazdne()
{int x,y;
for (y=0;y<=7;y++)
{for (x=0;x<=7;x++)
{if (pole[y][x].JeObsadene) return false;
else return true;
}
}
}
bool DaSa(int x1, int y1, int x2, int y2)
{ if (pole[y1][x1].znak==' ' || pole[y2][x2].znak==' ') return false;
if (pole[y1][x1].JeObsadene && pole[y2][x2].JeObsadene ) return true;
if (pole[y1][x1].znak!=pole[y2][x2].znak) return false;
return true;
}
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{stav=1;
Precitaj();
Kresli();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
TMouseButton Button, TShiftState Shift, int X, int Y)
{ if (X<0 || X>300 || Y<0 || Y>300) return;
X=X/30;
Y=Y/30;
if (stav==1)
if (DaSa(PrveX,PrveY,X,Y))
X=PrveX;
Y=PrveY;
stav=2;
Kresli();
return;
if ((X!=PrveX && Y!=PrveY) && (pole[PrveY][PrveX].znak==pole[Y][X].znak))
{pole[PrveY][PrveX].znak=' ';
pole[Y][X].znak=' ';
Kresli();
}
stav=1;
Kresli();
}
//---------------------------------------------------------------------------
program c.3
http://www.salanci.sk/C/Skuska4/index.html
tak v tomto programe fakt neviem ako mam osetrit to, aby sa mi nacitala z textaku farba.. ani neviem ako vlastne mam nacitat tie udaje do mojej strukturovanej premennej
za kazdu radu dakujem
