Re: een algoritme...

Article View: be.comp.programming

Article #5185

Back to be.comp.programming Previous Next

#5185

From: TRAX
Date: Thu, 15 May 2003 15:13

49 lines
3253 bytes

zal alles nog eens goed nakijken en mijn code nog eens copy pasten:

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[rij].size(); kol++)
   {
     TPicture *picture;
     picture= new TPicture;
     picture->LoadFromFile("jaja.jpg");

     TImage *Image;
     Image = new TImage(this);
     Image->Picture=picture;
     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;
     Image->OnClick=imgklik;
     pictabel[rij][kol] = Image;
        }
}
}

void __fastcall TFrmhoofd::imgklik(TObject *Sender)
{
   TImage *Image = dynamic_cast<TImage* >(Sender);
   if (Image) {
    int tag = Image->Tag;
     int rij = (Image->Tag >> 16) & 0xffff;
     int kolom = Image->Tag & 0xffff;

     Beep();

   }


}

Technical Details

Message-ID: <H8Owa.3445$1u5.182@afrodite.telenet-ops.be>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!opentransit.net!jussieu.fr!utc.fr!u-picardie.fr!news.completel.fr!nntpfeed-01.ops.asmr-01.energis-idc.net!news.eweka.nl!newsfeed.kabelfoon.nl!212.113.2.136.MISMATCH!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail

References:

<T%awa.698$1u5.156@afrodite.telenet-ops.be> <fXdwa.1083$1u5.154@afrodite.telenet-ops.be> <y%kwa.1270$1u5.216@afrodite.telenet-ops.be> <8nmwa.1335$1u5.157@afrodite.telenet-ops.be> <Iumwa.1342$1u5.172@afrodite.telenet-ops.be> <1rnwa.1395$1u5.221@afrodite.telenet-ops.be> <WXswa.12970$me2.1724304@amsnews02.chello.com> <S7twa.1963$1u5.278@afrodite.telenet-ops.be> <9gtwa.13139$me2.1757061@amsnews02.chello.com> <mQxwa.2396$1u5.372@afrodite.telenet-ops.be> <E6Iwa.3025$1u5.276@afrodite.telenet-ops.be> <TgJwa.3089$1u5.223@afrodite.telenet-ops.be> <qBJwa.3110$1u5.237@afrodite.telenet-ops.be> <WHJwa.3118$1u5.410@afrodite.telenet-ops.be> <kIKwa.3217$1u5.383@afrodite.telenet-ops.be> <iPMwa.3361$1u5.288@afrodite.telenet-ops.be> <h3Nwa.3375$1u5.326@afrodite.telenet-ops.be> <eONwa.3428$1u5.149@afrodite.telenet-ops.be> <T6Owa.3443$1u5.149@afrodite.telenet-ops.be>

Show Full Headers

Complete Article Headers

X-Google-Language: DUTCH,ASCII-7-bit
X-Google-Thread: fcea4,dcf5f7295edf5117
X-Google-Attributes: gidfcea4,public
X-Google-ArrivalTime: 2003-05-15 08:13:55 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-02!sn-xit-04!sn-xit-01!sn-xit-09!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!opentransit.net!jussieu.fr!utc.fr!u-picardie.fr!news.completel.fr!nntpfeed-01.ops.asmr-01.energis-idc.net!news.eweka.nl!newsfeed.kabelfoon.nl!212.113.2.136.MISMATCH!newsfeed.london1.eu.level3.net!level3eu!ossa.telenet-ops.be!afrodite.telenet-ops.be.POSTED!not-for-mail
From: "TRAX" <Stijn.Verspeet@pandora[delete.this].be>
Newsgroups: be.comp.programming
References: <T%awa.698$1u5.156@afrodite.telenet-ops.be> <fXdwa.1083$1u5.154@afrodite.telenet-ops.be> <y%kwa.1270$1u5.216@afrodite.telenet-ops.be> <8nmwa.1335$1u5.157@afrodite.telenet-ops.be> <Iumwa.1342$1u5.172@afrodite.telenet-ops.be> <1rnwa.1395$1u5.221@afrodite.telenet-ops.be> <WXswa.12970$me2.1724304@amsnews02.chello.com> <S7twa.1963$1u5.278@afrodite.telenet-ops.be> <9gtwa.13139$me2.1757061@amsnews02.chello.com> <mQxwa.2396$1u5.372@afrodite.telenet-ops.be> <E6Iwa.3025$1u5.276@afrodite.telenet-ops.be> <TgJwa.3089$1u5.223@afrodite.telenet-ops.be> <qBJwa.3110$1u5.237@afrodite.telenet-ops.be> <WHJwa.3118$1u5.410@afrodite.telenet-ops.be> <kIKwa.3217$1u5.383@afrodite.telenet-ops.be> <iPMwa.3361$1u5.288@afrodite.telenet-ops.be> <h3Nwa.3375$1u5.326@afrodite.telenet-ops.be> <eONwa.3428$1u5.149@afrodite.telenet-ops.be> <T6Owa.3443$1u5.149@afrodite.telenet-ops.be>
Subject: Re: een algoritme...
Lines: 52
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2800.1106
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <H8Owa.3445$1u5.182@afrodite.telenet-ops.be>
Date: Thu, 15 May 2003 15:13:43 GMT
NNTP-Posting-Host: 213.118.62.47
X-Complaints-To: abuse@telenet.be
X-Trace: afrodite.telenet-ops.be 1053011623 213.118.62.47 (Thu, 15 May 2003 17:13:43 MET DST)
NNTP-Posting-Date: Thu, 15 May 2003 17:13:43 MET DST
Organization: Telenet Internet

Reply to Parent Message