[ milos 2 @ 07.11.2009. 17:29 ] @
ja imam problem oko prosirivanja forme na sledeci nacin u builder Borland 6.0 C++-u: imam osnovnu zadatu formu, ne mora nista da bude na njoj, i treba da kada strelica misa stigne do donje horizontalne linije da se ona prosiri, i da na tom produzetku imam chack box koji ima svojstvo da za 50% smanji vidljivost one gornje forme kada je cekiran, a da vrati na vidljivost 100% kada nije cekiran.

da li mozete nekako da mi pomognete oko toga
[ milos 2 @ 08.11.2009. 20:13 ] @
zar niko ne zna?

da li neko ima bar neku ideju?
[ vko @ 15.01.2010. 00:02 ] @
Recimo Form1->ClientHeight=Form1->ClientHeight+50; za "produzavanje" forme,
a shto se tiche provere kada forma treba da se proshiri idi na dogadjaj forme MouseMove
Javi ako zapne
[ milos 2 @ 15.01.2010. 21:03 ] @
zapeo sam, sta da napisem u events mosemove
[ milos 2 @ 15.01.2010. 21:13 ] @
treba mi da samo kada stavim na bilo koji deo donje ivice stavim mis, ali da kada sklonim mis, da se forma vrati.
[ vko @ 15.01.2010. 21:53 ] @
Form1->ClientHeight=Form1->ClientHeight+50; komanda kaze da se forma "produzi" za 50 a
Form1->ClientHeight=Form1->ClientHeight-50; bi trebalo da znachi da se forma smanji za 50
stavi uslov koji proverava gde se kurzor nalazi i tako cesh znati da li da "produzish" ili "skratish" formu
ps to 50 moze da bude neka promenljiva recimo promena_velicine_forme ili promena_po_y
a da bi znao gde se nalazi kurzor imash X i Y vrednosti u funkciji MouseMove
[ milos 2 @ 16.01.2010. 14:32 ] @
imam problem, kada otkucam
Code:
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
        if (X=5, Y=5)
        {
                Form1->ClientHeight=Form1->ClientHeight+5;
        }
}


cim predjem na formu ona mi se prosiruje u beskonacnost. kako to da ispravim?

i da jos jedno pitanje, kako u prosirenje da stavim neki element, kao sto je npr chack box?
[ vko @ 16.01.2010. 15:40 ] @
Code:
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
if(Y==Form1->ClientHeight-1&&provera==1) //proverava da li se
{                                        // kurzor nalazi na donjoj ivici i da li je provera==1 (provera je 1 ako se forma josh nije prosirila a 0 ako jeste)
Form1->ClientHeight=Form1->ClientHeight+neki_br;  //forma se produzuje
provera=0; // provera se postavlja na 0 da bi kasnije znali da je forma produzena
c_box1 = new TCheckBox(this);
c_box1->Parent=Form1;          //postavljash ChackBox na formu pri chemu ChackBox ima ime c_box1
c_box1->Left=neki_br;
c_box1->Top=neki_br;      //postavljash koordinate u na kojima ce se nalaziti c_box1
}


}

pri chemu provera i c_box1 moraju da budu definisani ovako
Code:
class TForm1 : public TForm
{
__published:    // IDE-managed Components
        void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
        void __fastcall FormCreate(TObject *Sender);
private:    // User declarations
public:
int provera;
TCheckBox *c_box1;    // User declarations
        __fastcall TForm1(TComponent* Owner);
};
[ milos 2 @ 16.01.2010. 16:35 ] @
uradio sam tako, ali nece da se produzuje forma
[ vko @ 16.01.2010. 17:04 ] @
da li si negde definisao provera?
recimo na OnCreate

Code:
void __fastcall TForm1::FormCreate(TObject *Sender)
{
provera=1;
}