07. marts 2002 - 14:39Der er
6 kommentarer og 1 løsning
TComponent(sender).Name fortsat 2
Når jeg trykker på et billede for jeg navnet på image komponenten ved hjælp af en procedure med følgende:
(FindComponent(TComponent(sender).Name) as TImage).Picture
problemet er at jeg bruger fuldstændig samme kommando til at finde ud af hvilket billede den skal smide ind istedet bare en anden procedure, og så ender koden jo med at blive
(FindComponent(TComponent(sender).Name) as TImage).Picture := (FindComponent(TComponent(sender).Name) as TImage).Picture
kan man ikke på en eller anden måde kende forskel på disse to så det ender med at blive:
Ahhhh efter et par forsøg fik jeg fattet koden, det er bare mig der sover, nu virker det takker mange gange for hjælpen, kan du ikke lige oprette et svar så får du dine point :-) Jeg skulle jo bare sætte det aller første ind som variable:
var := TComponent(sender).Name
(FindComponent(var) as TImage).Picture og så sammenlign
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
