Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
Turbo Delphi für Win32
|
Re: Problem beim Laden von TGA's
16. Sep 2006, 18:24
Einfach so machen:
Delphi-Quellcode:
type TRGBAValue = record
case Integer of
1: (Value: Cardinal);
2: (Alpha, Blue, Green, Red: Byte);
end;
Dann kannst du auch so lesen:
mystream.Read(myRGBAValue, sizeof(TRGBAValue));
Manuel Eberl „The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
|