Reply to hopsender Label on Thu, 01 Mar 2007 10:54:56 GMT

Renate — Thu, 01 Mar 2007 10:54:56 GMT

Wie muss ich hier programmieren, dass der hopsende Label mit einem einmaligem click bis zum minimun oben, minimun links, maximum rechts und maximum unten hopst also quasi wie ein Ball
Ich dachte an eine for-Schleife

private:
  int maxheight;  // Maximalhöhe festlegen
  int maxwidth;   // Maximalbreite festlegen
//--------------------------------------------------------------------------- 

__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
   maxheight = 350;
   maxwidth = 650;
}
//--------------------------------------------------------------------------- 

void __fastcall TForm1::Button_obenClick(TObject *Sender)
{
   if(Label_1->Top <= 11) {
      ShowMessage("minimun oben erreicht");
   }
   else {
      Label_1->Top = Label_1->Top -10;
   }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_linksClick(TObject *Sender)
{
   if(Label_1->Left <= 11) {
      ShowMessage("minimun links erreicht");
   }
   else {
      Label_1->Left = Label_1->Left - 10;
   }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_rechtsClick(TObject *Sender)
{
   if(Label_1->Left >= maxwidth) {
      ShowMessage("maximum rechts erreicht");
   }
   else {
      Label_1->Left = Label_1->Left +10;
   }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_untenClick(TObject *Sender)
{
   if(Label_1->Top >= maxheight) {
      ShowMessage("maximum unten erreicht");
   }
   else {
      Label_1->Top = Label_1->Top + 10;
   }
}

Reply to hopsender Label on Thu, 01 Mar 2007 11:27:53 GMT

[[global:guest]] — Thu, 01 Mar 2007 11:27:53 GMT

Wieso denn noch einen neuen Thread?!?

Reply to hopsender Label on Thu, 01 Mar 2007 11:35:14 GMT

akari — Thu, 01 Mar 2007 11:35:14 GMT

Hallo

hier gehts weiter.

bis bald
akari