Forum: Win32/Win64 API (native code)
Delphi
by omata,
19. Jan 2005
Gut, ich hatte ein bißchen experimentiert und bekomme etwas gezeichnet. Allerdings sieht das nicht so aus wie mein Bild, weil ich dein kompischen Konzept nicht nachvollziehen kann. Aber vielleicht hilft es dir, weil du die Parameter für CreateBitmap besser kennst...
var Datei:TFileStream;
Buffer:Pointer;
bmp:HBITMAP;
_hDC, hDC:windows.hDC;
nWidth, nHeight:integer;
begin
...
Forum: Win32/Win64 API (native code)
Delphi
by omata,
19. Jan 2005
Moin,
da kann ich dir leider nicht weiterhelfen. Würde ich ja gern, aber ich kann keine Gedanken lesen. ich habe keine Ahnung was du da machst. Dein Hinweis mit dem TFileStream ist ja sehr nett, ich weiss allerdings nicht wie bzw. was du da genau machst.
Sorry
Thorsten
Forum: Win32/Win64 API (native code)
Delphi
by omata,
18. Jan 2005
Moin,
da man nicht viel von deinem Code sehen kann...
Habe ich mal folgendes probiert...
procedure malen;
var bmp:HBITMAP;
_HDC, hDC: windows.HDC;
begin
Forum: Win32/Win64 API (native code)
Delphi
by omata,
18. Jan 2005
Moin,
kann es eventuell daran liegen, dass das Bitmap nicht geräteunabhängig ist.
Bitmap.HandleType:=bmDIB;
MfG
Thorsten