Forum: Multimedia
Delphi
by movax,
18. Jul 2002
also dann.. ich hab mich mal hingesetzt und schnell was für dich zusammengeschustert:
procedure TForm1.Button1Click(Sender: TObject);
var
gif: integer;
dmy: array of Char;
Width, Height: integer;
begin
gif := FileOpen('blabla.gif');
FileSeek(gif, 6, 0); //<- man könnte hier noch testen, ob
Forum: Multimedia
Delphi
by movax,
13. Jul 2002
@TPercon:
Also, bei jpg-bildern kannst du's ja über'n verstecktes image-feld mit autosize:=true auslesen.
und wegen den gif-pics: schau mal auf wotsit.org nach, da gibt'S auch einige texte zu Gif-Dateien.
greetz,
-movax-
|movax.rult.de