Avatar billede assassin Juniormester
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
Avatar billede dkn Nybegynder
25. november 2002 - 11:03 #1
har du prøvet med:
aPicture.LoadFromFile(BilledFil);
Avatar billede dkn Nybegynder
25. november 2002 - 11:04 #2
ups doh jeg er vidst dum ligenu
Avatar billede dkn Nybegynder
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
Avatar billede assassin Juniormester
25. november 2002 - 11:12 #4
Jeg er åbne overfor andre forslag
Avatar billede stoney Nybegynder
25. november 2002 - 11:19 #5
har du husket at tilføje jpeg i uses

Stoney
Avatar billede assassin Juniormester
25. november 2002 - 11:29 #6
>> Stoney

Ja, Jpeg er i uses
Avatar billede hermandsen Juniormester
25. november 2002 - 12:00 #7
Virker fint her! :)
Avatar billede assassin Juniormester
26. november 2002 - 10:19 #8
Skal jeg virkelig prøve at gå forgæves til eksperten?
Avatar billede hermandsen Juniormester
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...
Avatar billede assassin Juniormester
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..
Avatar billede assassin Juniormester
26. november 2002 - 10:47 #11
>>Hermandsen

Det ændre ikke noget som helst, jeg får stadig samme fejl.

Mystisk
Avatar billede hermandsen Juniormester
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! ;)
Avatar billede assassin Juniormester
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.
Avatar billede hermandsen Juniormester
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...
Avatar billede assassin Juniormester
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.
Avatar billede assassin Juniormester
26. november 2002 - 14:26 #16
Hvis jeg angiver et jpg billede i object inspectoren i picture, så er der intet problem
Avatar billede hermandsen Juniormester
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?
Avatar billede assassin Juniormester
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.
Avatar billede assassin Juniormester
29. november 2002 - 08:04 #19
Tak for hjælpen.
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester