Onclick på usynlig-ting?

Du ligger et image komponent på stedet, men vælger ikke at loade et billede.
Du kan så klikke på komponenten.

Bare fordi man ikke kan se det, betyder det ikke at det ikke er der :)

ok, det virker som sådan fint nok... på nær at de andre billeder lægger sig OVEN PÅ, så klikker ikke opfanges.
Hvordan kan det klares?

Du kan også ændre skifte billedet til at være ensfarvet og derefter sætte denne farve til transparent.

Så skal du have fat i noget z-index eller hvad det nu hedder i Delphi..

Du skal blot sætte

billeder[i].transparent:=true;

mmm nej, transparent gør dem ikke "gennemklikkelige", kun gennemsigtige; man kan se igennem det hvide på billedet, men den fanger ikkke hvad man klikker på.

Du skal ikke lægge noget nyt billede over det gamle, men blot ændre dit nuværende billede til transparent, så virker det.

og så skal du naturligvis sætte en onclick event på dit billede

fra deres help:
"Specifies whether the background of the image obscures objects below the image object.

property Transparent: Boolean;

Description

Set Transparent to True to allow objects behind the TImage object to show through the background of the bitmap.  Set Transparent to False to make the background of the bitmap opaque. Setting Transparent sets the Transparent property of the Picture."


transparent på et billede gør den gennesigtig, men ikke at man kan klikke igennem den :s

Jeg har som sagt lagt et usynligt billede der hvor de dynamiske billeder kommer... de usynlige billeder er bare desværre neders så de ikke opfanger at man trykker der.

Kan du ikke blot lave en onclick event på dine synlige billeder ?

de synlige billeder er dem som oprettes vha. imagelist'en... jeg ved ikke om det er muligt at lave en onclick event på dem - hvordan det skal gøres ved jeg ikke.
Har kun fundet frem til at lave events i design-mode.

Kan du ikke bruge noget fra dette:

procedure TForm1.FormShow(Sender: TObject);
var i : integer;
begin
    //initialiser billeder
    for i:=0 to 7 do
    begin
    billeder[i]:=Timage.Create(Self);
    billedliste.GetBitmap(0,billeder[i].picture.bitmap);
    billeder[i].Parent:=Self;
    billeder[i].Visible := True;
    billeder[i].Left := i*50;
    billeder[i].top := 200;
    billeder[i].Transparent:=true;
    billeder[i].OnClick:=TestClick;
    end;
end;


procedure TForm1.TestClick(Sender: TObject);
begin
//
end;

Hvis området du vil klikke på ligger hen over eks. et TListBox, så kan du gøre følgende (men kun indenfor denne):

procedure TForm1.ListBox2MouseDown(Sender: TObject; Button: TMouseButton;
                                  Shift: TShiftState; X, Y: Integer);
begin
  if (X >= 16) and (X <= 64) and
    (Y >= 16) and (Y <= 64) then
    MessageDlg('Hvasååå!', mtInformation, [mbOK], 0);
end;

Det lyder dog stadig som noget skod-GUI du har gang i.

lei, lol, hvorfor er det altid så nemt??
Jo, det kunne man... og det virker.

Hvis man kunne
billeder[i].OnClick:=switch(i);
ville det være lidt smartere, men det ser ud til at den ikke går med til at tage parametre.

hrc, jeg er noob til delphi... kender ikke dets muligheder og begrænsninger. Så det bliver måske ikke den mest optimale kode, men det skal nok komme hen ad vejen

Hvis du vil have forskellige events for de forskellige billeder kan du måske styre det således:

Case i of
  0: billeder[i].OnClick:=TestClick0;
  1: billeder[i].OnClick:=TestClick1;
  osv., osv.
end;

ja, valgte jeg også at gøre til sidst... er ikke optimalt (det andet ville fylde mindre) men det virker da perfekt.

tak for hjælpen!