Robie program w ktorym potrzebuje odczytac dowolny plik bmp i zaladowac go do tablicy dynamicznej aby moc szybko na nim pracowac. Czy ktos wie jak moge to zrobic??
Jaśli piszesz pod windoze, to chyba lepiej wczytajć standardowo a potem zablokowac ...
var
bmp:HANDLE; {lub HBITMAP}
pbmp:pointer;
bmp:=LoadImage(...); // czy też co innego, co zwraca uchwyt.
*bmp:=HBITMAP(LoadImage(...)) * dla HBITMAP
pbmp:=LockResource(bmp);
//...
DeleteObject(bmp); // na koniec
A jak musisz do tablicy dynamicznej, użyj:
F:file;
tablica:array of byte;
begin
AssignFile(F,'nazwa.bmp);
Reset(F,1);
SetLength(tablica,FileSize(F));
BlockRead(F,tablica[0],FileSize(F));
CloseFile(F);
tylko ze teraz jest maly problem bo potrzebuje odczytac plik bmp w monochromie i przepisac do tablicy dynamicznej tylko samo ulozenie pikseli w bitmapie i w jedej komorce tablicy chce juz miec od razu opisany tylko jeden piksel.
ewentualnie jezeli ktos wie jak w delphi odczytac z jakich bitow sklada sie byte?
Bosh...
function BitFromByte(B, bitno :byte):byte;
begin
Result:=((B shr bitno) and 1);
end;
Wielkie dzieki pq...