🚀 go-pugleaf

"TRAX" <Stijn.Verspeet@pandora[delete.this].be> schreef in bericht
news:ldHwa.2960$1u5.394@afrodite.telenet-ops.be...
> Ongelofelijk maar waar! Alles werkt, geen enkele fout maar ik zie mijn
> kaartjes niet meer in mijn gui, alles wat ik verander heb is die onclick
> event, en die geeft geen enkele fout. De Images staan er volgens mij wel,
ik
> kan er overgaan met de cursor, en't wordt een handje, maar ik zie ze dus
> niet. Bovendien zou ik toch een beep moeten horen als ik dan klik maar dat
> doet hij dus ook niet, strange. heb er al de hele avond op zitten zoeken
> maar vind het niet. Als ik een messagebox display doet ie het wel dus zal
> ergens aan mijn instellingen liggen denk ik, dat uitblijven v/d beep

soms werk de beep() functie niet, ik heb dit ook al ondervonden.

> tsjonge, ik moet nog veel leren
>
> void TFrmhoofd::kaartenzetten()
> {
> int rij = 2;
> int kol = 4;
> std::vector< std::vector<TImage*> > pictabel(rij,
> std::vector<TImage*>(kol));
>
> for (int rij = 0; rij < pictabel.size(); rij++)
> {
>    for (int kol = 0; kol < pictabel[i].size(); kol++)
>    {
>      TPicture *picture;
>      picture= new TPicture;
>      picture->LoadFromFile("c:/downloads/jaja.jpg");

een jpg kan niet direct  in een TPicture worden geladen, je moet eerst via
TJPGImage de jpg laden en via de class functie assign aan uw picture
toekennen. een TPicture kan een aantal bestanden ondersteunen o.a bitmap,
maar je moet het in de juiste property stoppen. Best eens help bekijken voor
TPicture en TJPGImage in CBUILDER. en zoek ook  eens op het internet naar
voorbeelden. een goede bron zijn ook de use groepen van borland
Bcb zal je alleen maar leren door het te doen, en toch regelmatig eens de
helpfunctie te bekijken.

>
>      TImage *Image;
>      Image = new TImage(this);
>      Image->Parent = this;
>      Image->Left = 3+(1.1*Image->Width*kol);
>      Image->Top = 3+(1.2*Image->Height*rij);
>      Image->Tag = (rij << 16) | kol;
>      Image->Width = 60;
>      Image->Height = 120;
>      Image->Stretch=true;
>      Image->Visible=true;
>      Image->Cursor=crHandPoint;
>      pictabel[rij][kol] = Image;
>      pictabel[rij][kol]->OnClick=imgklik;
>    }
> }
> }
>
> void __fastcall TFrmhoofd::imgklik(TObject *Sender)
> {
>    TImage Image = dynamic_cast<TImage >(Sender);
>    if (Image) {
>      int rij = (Image->Tag >> 16) & 0xff;
>      int kolom = Image->Tag & 0xff;
>      Beep();
>    }
>
> --
>
>
>
>