🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Thread View: be.comp.programming
3 messages
3 total messages Started by TRAX Thu, 15 May 2003 07:20
meer borland probleempjes:
#5170
Author: TRAX
Date: Thu, 15 May 2003 07:20
61 lines
3020 bytes
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
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");

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

--



begin 666 frown.gif
M1TE&.#EA#P`/`)$``````+V]O8RM_[V]O2'Y! $```,`+ `````/``\```(O
MG V9QY,"X6) QBK P?A*E$5BI76/9*:7*K:K"Y^H,CK6^-GPM>U9(T,U-@H-
$HP``.P``
`
end
Re: meer borland probleempjes:
#5230
Author: edg
Date: Thu, 15 May 2003 20:14
73 lines
3466 bytes
"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();
>    }
>
> --
>
>
>
>
Re: meer borland probleempjes:
#5233
Author: TRAX
Date: Thu, 15 May 2003 20:47
6 lines
1522 bytes
> een jpg kan niet direct  in een TPicture worden geladen,

jawel :) was gewoon de pic vergeten toe te wijzen aan image
om een jpge toe te kennen aan een TPicture moet je gewoon <jpeg.hpp>
includen in de declaration
Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads