Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
Vil have den til at skrive: Bogstav1Image.picture.LoadFromFile('Bogstaver\'+Facit[1]+'.JPG'); Bogstav2Image.picture.LoadFromFile('Bogstaver\'+Facit[2]+'.JPG');
var I : Integer; begin For I:= 1 to ComponentCount do begin if (Components[I] is TImage) then (Components[I] as TImage).Picture.LoadFromFile('/bogstaver/'+Facit[i]+'.gif');
for i:=1 to Length(Facit) do Begin TImage(FindComponent('Bogstav'+IntToStr(i)+'Image')).Picture.LoadFromFile(); (Components[I] as TImage).Picture.LoadFromFile('/bogstaver/'IntToStr(i)+'.jpg'); End;
for i:=1 to Length(Facit) do Begin TImage(FindComponent('Bogstav'+IntToStr(i)+'Image')).Picture.LoadFromFile('/bogstaver/'IntToStr(i)+'.jpg'); //(Components[I] as TImage).Picture.LoadFromFile('/bogstaver/'IntToStr(i)+'.jpg'); End;
For i:=1 to Length(Facit) do if TImage(FindComponent('Bogstav'+IntToStr(i)+'Image')).Picture = StrToInt('') then Result:= True;
Men det virker ikke. Den forstår ikke FindComponent.. hvorfor dog ikke det?
Synes godt om
Ny brugerNybegynder
Din løsning...
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.
