hopsender label

[RenateD]

Ich möchte einen Label erstellen der mit Hilfe von 4 Buttons nach oben, unten, links und rechts um 10 pixel hopsen kann.
Wie erstelle ich in der Header Datei zwei private Variablen, mit der Bezeichnung client->With und client->Height

Ich hab hier was reingestellt, aber das ist noch nicht so wie ich's will.
Ich will mit Hilfe von 2 If Abfragen abfragen wann Top und Left erreicht ist.
Ich hoffe ich hab's klar formuliert!

//---------------------------------------------------------------------------

#include
#pragma hdrstop

#include "Hopser.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_obenClick(TObject *Sender)
{
Label_1->Top=10;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_linksClick(TObject *Sender)
{
Label_1->Left=0;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_rechtsClick(TObject *Sender)
{
Label_1->Left=650;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button_untenClick(TObject *Sender)
{
Label_1->Top=350;
}

 

[Turri]

Hallo,

maxheight und maxwidth noch in die TForm-Klasse in der Headerdatei.

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;
   }
}

Kommst du an das Maximum, sollte die MessageBox aufgehen.

Ich hoffe ich habs richtig verstanden und konnte dir weiterhelfen ;-)

MfG Turri