31. december 2006 - 13:54
Der er
6 kommentarer og 1 løsning
Bruge procedure variabel til at afvikle kode
Hej Jeg har en procedure procedure TegnTing(tal:integer); begin image1.picture.loadfromfile('c:\blabla.bmp'); end; Nu vil jeg gerne bruge variablen "tal" til at afgøre hvilket image der bliver sat. Altså TegnTing(1) -> image1.picture....... TegnTing(2) -> image2.picture....... osv. Kan det kun gøres med case/if-sætninger, eller kan det gøres smartere? /Morten
Annonceindlæg tema
Forsvar & beredskab
Cybersikkerhed, realtidsdata og robuste it-systemer er blevet fundamentet for moderne forsvar.
31. december 2006 - 14:23
#1
det nemmeste er helt klart en case-of sætning :) case Tal of 1: image1.picture.loadfromfile(...) ... :)
31. december 2006 - 14:23
#2
sidder ikke lige med delphi. men du kan bruge din image tag (tag er en integer)
31. december 2006 - 15:50
#3
Hvad med, hvis din Form hedder Form1: procedure TegnTing(tal:integer); begin (Form1.FindComponent('image'+IntToStr(tal)) as TImage).Picture.loadfromfile('c:\blabla.bmp'); end;
01. januar 2007 - 03:29
#4
FindComponent er super! Smid et svar.
01. januar 2007 - 19:48
#5
ok
02. januar 2007 - 15:41
#6
"Accepter" virker ikke. Skal man gøre noget specielt?
02. januar 2007 - 16:06
#7
afmærk kroning og så accepter...
Kurser inden for grundlæggende programmering