ShowBitmap

[Kohle]

Ich möchte in einem Programm (VO-Dialekt) eine Bitmap-Datei mit Hilfe der Funktion ShowBitmap anzeigen. Das angezeigt Fenster bleibt jedoch leer, die zu Kontrollzwecken eingefügte ErrorBox zeigt allerdings OK an. Woran kann das liegen?
Gibt es eventuell einen anderen Weg Bilder (auch in anderen gängigen Grafikformaten, wie JPG) anzuzeigen?

Vielen Dank

Frank Kohle

------------------------------------------------
CLASS DlgPicture INHERIT wDlgPicture

CONSTRUCTOR(oOwner)
SUPER(oOwner)
IF ShowBitmap(oDCFixedBMP:Handle(),"D:\Bilder\Geschwister.bmp","Kopf")
ErrorBox{,"OK"}:Show()
ELSE
ErrorBox{,"Fehler"}:Show()
ENDIF
RETURN SELF */

METHOD PB_OK()
SELF:EndDialog()
RETURN SELF

END CLASS
--------------------------------------------------
;// designer generated file, do not modify
;// WINDOW wDlgPicture from C:\X-Projekt\Kunstkatalog\Applications\Kunstkatalog\wDlgPicture.prg.rc
#define WDLGPICTURE_FIXEDBMP 100
#define WDLGPICTURE_PB_OK 101
#define WS_TABSTOP 0x10000
#define WS_BORDER 0x800000
#define SS_BITMAP 0xE
#define WS_CHILD 0x40000000
#define DS_MODALFRAME 0x80
#define WS_SYSMENU 0x80000
#define WS_CAPTION 0xC00000
#define WS_POPUP 0x80000000
#define DS_3DLOOK 0x4
wDlgPicture DIALOGEX 3, 3, 545, 522
STYLE DS_3DLOOK|WS_POPUP|WS_CAPTION|WS_SYSMENU|DS_MODALFRAME
CAPTION "Abbildung Werk 000000"
FONT 8, "MS Shell Dlg"
BEGIN
CONTROL "", WDLGPICTURE_FIXEDBMP, "STATIC", WS_CHILD|SS_BITMAP|WS_BORDER, 5, 5, 533, 492
CONTROL "&OK", WDLGPICTURE_PB_OK, "BUTTON", WS_CHILD|WS_TABSTOP, 485, 502, 53, 12
END

[ArneOrtlinghaus]

Die FabpaintLib von Fabrice Fauray kann mehr Bildformate korrekt anzeigen.

Gruß
Arne

[Kohle]

Um FabPaint einzubinden, ergeben sich für mich folgende Fragen:
• Welche FabPaint-Datei muss ich im Programm einbinden? Das Programm verwendet X#-VO-Dialekt.
• Wo finde ich die passende Datei? Google findet viele unterschiedliche Versionen an verschiedenen Orten.
• Wo finde ich eine Beschreibung?

Vielen Dank

Frank Kohle

[FFF]

Kuckst Du unter
https://github.com/X-Sharp/FabTools