25. november 2002 - 10:49
Der er
18 kommentarer og 1 løsning
Fejl ved Timage.Picture.LoadFromfile (unknown file extention)
procedure TUdskriv.Udskriver(aSti, aFil : String); var i, StartTop, YDiff : integer; IniFil : TIniFile; aPicture : TImage; aLabel, bLabel, cLabel : TLabel; aListe : TStringList; BilledFil : String; begin StartTop := 8; YDiff := 50; aListe := TStringList.Create; IniFil := TIniFile.Create(aSti+aFil); For i := 1 to StrToInt(IniFil.ReadString('0', 'AntalBilleder', '')) do begin IniFil.ReadSectionValues((IntToStr(i)), aListe); //Læser alt fra sektionen (i) aPicture := TImage.Create(nil); // Billed With aPicture do begin Width := 400; Height := 400; Left := 8; BilledFil:= Main.EdtDirectory.Text+'\'+IniFil.ReadString(IntToStr(i), 'Løsning', ''); >> Picture.LoadFromFile(BilledFil); end; InsertComponent(aPicture); inc(StartTop, YDiff); end; aListe.Free; IniFil.Free; end; Ved >> får jeg følgende fejl: Unknown picture file extension (.jpg). Hvorfor?????? Jeg har andre steder i programmet hvor jeg får vist jpg billeder vha. TImage
Annonceindlæg tema
Cloud & AI
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
25. november 2002 - 11:03
#1
har du prøvet med: aPicture.LoadFromFile(BilledFil);
25. november 2002 - 11:04
#2
ups doh jeg er vidst dum ligenu
25. november 2002 - 11:05
#3
men generelt er det ikke godt at bruge "with do" da den nemt kan lave fejl som er svære at finde
25. november 2002 - 11:12
#4
Jeg er åbne overfor andre forslag
25. november 2002 - 11:19
#5
har du husket at tilføje jpeg i uses Stoney
25. november 2002 - 11:29
#6
>> Stoney Ja, Jpeg er i uses
25. november 2002 - 12:00
#7
Virker fint her! :)
26. november 2002 - 10:19
#8
Skal jeg virkelig prøve at gå forgæves til eksperten?
26. november 2002 - 10:29
#9
Måske er det jpg-formatet der er ukendt!? Prøv at lave en tegning i paint, gem den som jpg og hent din ind i dit program...
26. november 2002 - 10:39
#10
Jeg kan få vist det samme jpg billede andet sted i programmet uden problemer, men jeg prøver lige..
26. november 2002 - 10:47
#11
>>Hermandsen Det ændre ikke noget som helst, jeg får stadig samme fejl. Mystisk
26. november 2002 - 12:06
#12
Jeg ved godt at det ikke er det der er problemet, men gør lige det her for at vise billedet på formen og fjerne det når formen bliver fjernet: aPicture := TImage.Create(Self); aPicture.Width := 400; aPicture.Height := 400; aPicture.Left := 8; aPicture.Parent := Self; aPicture.Picture.LoadFromFile(Main.EdtDirectory.Text+'\'+IniFil.ReadString(IntToStr(i), 'Løsning', '')); InsertControl(aPicture); //Du behøver vist ikke denne funktion, men den ødelægger ikke noget, så bare lad den være! ;)
26. november 2002 - 12:17
#13
Jeg får følgende fejl ved insertControl [Error] FrmUdskriv.pas(71): Incompatible types: 'TControl' and 'TImage' så den har jeg fjernet, men det ændre ikke noget ved det oprindelige problem.
26. november 2002 - 13:52
#14
Øhhh, så skriv formens navn.InsetControl... Det samme gælder under Create... Sæt din forms navn ind i stedet for Self! Det løser ikke dit problem, men nu kan du da se billedet! :) Jeg lavede selv et lille eksempel: procedure TForm1.Button1Click(Sender: TObject); var I: TImage; begin I := TImage.Create(Self); I.Parent := Self; I.Picture.LoadFromFile('C:\WINDOWS\Skrivebord\hest.jpg'); InsertControl(I); end; Og det ser altså ud til at virke ganske udemærket...
26. november 2002 - 14:19
#15
Jeg har prøvet dit eksempel i et nyt projekt, men får stadig samme fejl. Jeg overvejer at lukke spørgsmålet og finde ud af noget andet. Hermandsen >> Jeg vil gerne smide nogle points til dig, hvis du lægger et svar.
26. november 2002 - 14:26
#16
Hvis jeg angiver et jpg billede i object inspectoren i picture, så er der intet problem
29. november 2002 - 00:21
#17
Svar! Har du prøvet først at hente et jpg-billede ind fra Object Inspector, og derefter loade et via Picture.LoadFromFile?
29. november 2002 - 08:04
#18
Hermandsen>> Ja, det har jeg. Det er intet problem at hente det i object inspector, men når jeg prøver at hente det med loadFromFile, så får jeg fejlen.
29. november 2002 - 08:04
#19
Tak for hjælpen.
Kurser inden for grundlæggende programmering