4. Click 'N' Slide - Wie soll ich vorgehen ?

Click 'N' Slide - Wie soll ich vorgehen ?

  • A

    Hallo

    Nein du tauscht nicht die Tags aus, die bleiben bei ihren TImages. Sondern du verschiebst ja die TImages selber und damit die Tags auch.

    bis bald
    akari

    0
  • F

    Ok, danke !
    Habe jetzt versch. Methoden probiert, die jedoch sehr aufwendig sind und auch nicht richtig funktionierten, wie ich es möchte...

    Wie würdet ihr es machen, um möglichst wenig Zeilen schreiben zu müssen ?

    0
  • ?

    Hab was gefunden, was ich mal vor Ewigkeiten geschrieben hab.
    Ist allerdings auch nicht so das wahre und auch nur 33.
    Die einzelnen Bilder sind 100    100px groß.

    Unit1.h

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
   TButton *btnmix;
   void __fastcall btnmixClick(TObject *Sender);
private:	// Anwender-Deklarationen
public:		// Anwender-Deklarationen
   __fastcall TForm1(TComponent* Owner);
  TImage *img[9];
  short frei;
  short bildnr[9];
  void __fastcall ImgClick(TObject *Sender);
  bool __fastcall check();
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif

    Unit1.cpp

    #include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
#include <algorithm>
#include <jpeg.hpp>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"

TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
   : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::btnmixClick(TObject *Sender)
{
   srand(time(NULL));
   TJPEGImage *jpg;
   short x=0,y=0;
   for(short i=0;i<9;i++) bildnr[i]=i+1;
   std::random_shuffle(bildnr,bildnr+9);
   for(short i=0;i<9;i++)
   {
      if(img[i]==NULL) img[i]=new TImage(this);
      img[i]->Visible = true;
      if(bildnr[i]==1)
      {
         img[i]->Visible = false;
         frei=i+1;
      }
      img[i]->Parent = Form1;
      img[i]->OnClick = ImgClick;
      img[i]->Tag = bildnr[i];
      jpg = new TJPEGImage();
      jpg->LoadFromFile(IntToStr(bildnr[i])+".jpg");
      img[i]->Picture->Assign(jpg);
      delete jpg;
      img[i]->Left = x;
      img[i]->Top = y;
      x+=100;
      if(!(x%300))
      {
         y+=100;
         x=0;
      }
   }
}
void __fastcall TForm1::ImgClick(TObject *Sender)
{
   TImage *timg = dynamic_cast <TImage*>(Sender);
   short pos=(timg->Left%300/100)+1*(timg->Top%300/100)*3+1;
   if(((pos-1)/3==(frei-1)/3)&&(pos-1==frei||pos+1==frei)||pos-3==frei||pos+3==frei)
   {
      timg->Left = ((frei-1)*100)%300;
      timg->Top = ((frei-1)/3)*100;
      std::swap(bildnr[frei-1],bildnr[pos-1]);
      frei=pos;
      if(check())
      {
         img[0]->Visible = true;
         Application->MessageBoxA("Geschafft","Nachricht",MB_OK);
      }
   }
}
bool __fastcall TForm1::check()
{
   unsigned co=0;
   while(co<9&&img[co]->Tag==bildnr[co]) co++;
   return co==9;
}
    0
  • F

    Danke, aber das ist mir eindeutig zu hoch, geht das nicht einfacher ?

    0
  • ?

    Das geht natürlich einfacher mit etwas mehr Zeilen. 😉

    0
  • F

    Ich möchte es anders machen:

    Ich erzeuge die Buttons ~(Habe ich von einem Lehrer bekommen)~, weiß aber nicht, wie ich sie letztentlich verschieben kann.

    Ich danke für eure Hilfe, hier der Code:

    //---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;

TButton *Button[4][4];

//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
    int left = 10;
	int top = 10;
	int width = 100;
	int height = 100;

	// dynamisch 16 Buttons erzeugen:
	for (int zeile = 0; zeile < 4; zeile++)
	{
		for (int spalte = 0; spalte < 4; spalte++)
		{
			// einzelnen Buttons erzeugen:
			Button[zeile][spalte] = new TButton(Form1);
			Button[zeile][spalte]->Parent = Form1;

			// Name-Eigenschaft zuweisen
			Button[zeile][spalte]->Name = "Button" + IntToStr(zeile)  + IntToStr(spalte);

			// Abmessungen und Position vorgeben:
			Button[zeile][spalte]->Width = width;
			Button[zeile][spalte]->Left = left + spalte * (width + 2);
			Button[zeile][spalte]->Height = height;
			Button[zeile][spalte]->Top = top + zeile * (height + 2);

			// Ereignis-Routine für MouseDownEvent zuweisen:
			Button[zeile][spalte]->OnMouseDown = Button1MouseDown;
		}
	}

}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{

}
//---------------------------------------------------------------------------
    0
  • T

    Schau dir mal den folgenden Link an:
    http://www.c-plusplus.net/forum/viewtopic-var-t-is-39246.html

    Du mußt die drei Ereignisse OnMouseDown, OnMouseMove und OnMouseUp implementieren und deinen Bedürfnissen anpassen.

    0
  • F

    Das versteh ich irgendwie net.
    Das muss ja irgendwie einfacher gehen, doer nicht ?
    Wie würdet ihr es machen bei meinem Programm ?

    0
  • ?

    Und wie kommst du jetzt darauf TButton zu verwenden ?
    Ist etwas schwieriger dort Bilder reinzubekommen.
    Dafür kannst du doch TBitBtn oder TSpeedButton nehmen.

    0
  • F

    Das kann ich ja Nachträglich auch noch machen. Momentan hat eh jeder Button seine eigene Nummer. Wenn ich diese Struktur habe, möchte ich nur den Buttons ein anderes Caption geben...

    0
  • ?

    OnMouseDown, OnMouseMove und OnMouseUp brauchst du garnicht.
    Du musst nur deinen Buttons ein OnClick zuweisen.
    Dadrin fragst du ab, ob das "freie Feld" neben dem Button liegt.
    Wenn ja dann setzt du die Position des gedrückten Buttons auf das "freie Feld".

    0
  • F

    Ich komm einfach nicht dahinter, wie das aussehen soll...

    0
Anmelden zum Antworten