Delphi: duplisere TImage

[bjørnb]

Jeg har holdt på med Delphi noen dager nå, men kommer ikke unna et problem.

 

La oss si at jeg legger til et TImage på en form, så laster jeg opp et bilde til den komponenten (riktig ord?).

 

Så vil jeg, under programmets gang, kunne opprette flere kopier/instanser/duplikater av dette TImaget. Grunnen til dette er fordi jeg har flere brukere av programmet og TImaget til hver bruker skal kunne ha forskjellig X,Y-koordinat enn de andre (mens selve bildet er likt).

 

Hvordan i all verden gjør jeg dette? Prøver jeg å sette f.eks

bruker[13].bilde := originalBilde;

Peker den tydeligvis på samme bildet (som alle de andre..) slik at endrer jeg X,Y koordinater på en - endres det hos alle.

 

Takk for hjelpen

Endret 6. juni 2006 av bjørnb

[john_h]

Er ikke helt sikker på om jeg forstod hva du mente med X,Y-koordinater og endring av disse, men det spiller ingen rolle såvidt jeg kan se.

 

For å kopiere bildet kan du bruke:

 

bruker[13].bilde.Canvas.Draw(0, 0, Image1.Picture.Graphic);

 

Dette vil tegne Image1 på bildet til bruker[13], og starter å tegne i 0,0 (øverst til venstre). Hvis du vil at hele bildet til bruker[13] skal være Image1 er det bare å sette høyden og bredden på bildet til det samme som Image1.

[Emancipate]

   Image2.Picture := Image1.Picture;

Bildet skal da bli såkalt "copy-on-write", dvs. Image2 bare peker på samme bilde i minne som Image1 peker på. Men hvis du tegner på et av de, lages en kopi av hvert Picture.