error after run application
---------------------------
xsetow6.exe - Błąd aplikacji
---------------------------
Instrukcja spod "0x00000000" odwołuje się do pamięci pod adresem "0x00000000". Pamięć nie może być "read".
Kliknij przycisk OK, aby przerwać działanie aplikacji
Kliknij przycisk Anuluj, aby rozpocząć debugowanie programu
---------------------------
OK Anuluj
---------------------------
error run application
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
error run application
I am using xHarbour Compiler build 0.99.70 (SimpLex)
and FWH 7.05 ( operation system Windows XP)
and FWH 7.05 ( operation system Windows XP)
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
error after run application
when I run application
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact:
error after run application
#include "FiveWin.ch"
static oWnd
//----------------------------------------------------------------------------//
function Main()
local oBar
SET _3DLOOK ON
DEFINE WINDOW oWnd FROM 0,0 to 200,800 pixel TITLE "Karta pracy" ;
MENU BuildMenu()
SET MESSAGE OF oWnd TO "(c) Inkom"
ACTIVATE WINDOW oWnd
// VALID MsgYesNo( "Czy koniec ?" )
return nil
//----------------------------------------------------------------------------//
function BuildMenu()
local oMenu
MENU oMenu
MENUITEM "&Karta"
MENU
MENUITEM "&Pracownicy" //Action bro01()
MENUITEM "&Zleceniobiocy"
ENDMENU
MENUITEM "&Raporty"
MENU
MENUITEM "&Karta pracy" //Action rep01()
ENDMENU
MENUITEM "&Koniec"
MENU
MENUITEM "&Koniec" ACTION oWnd:End()
ENDMENU
ENDMENU
return oMenu
//----------------------------------------------------------------------------//
procedure AppSys // XBase++ requirement
return
// -------------------
static oWnd
//----------------------------------------------------------------------------//
function Main()
local oBar
SET _3DLOOK ON
DEFINE WINDOW oWnd FROM 0,0 to 200,800 pixel TITLE "Karta pracy" ;
MENU BuildMenu()
SET MESSAGE OF oWnd TO "(c) Inkom"
ACTIVATE WINDOW oWnd
// VALID MsgYesNo( "Czy koniec ?" )
return nil
//----------------------------------------------------------------------------//
function BuildMenu()
local oMenu
MENU oMenu
MENUITEM "&Karta"
MENU
MENUITEM "&Pracownicy" //Action bro01()
MENUITEM "&Zleceniobiocy"
ENDMENU
MENUITEM "&Raporty"
MENU
MENUITEM "&Karta pracy" //Action rep01()
ENDMENU
MENUITEM "&Koniec"
MENU
MENUITEM "&Koniec" ACTION oWnd:End()
ENDMENU
ENDMENU
return oMenu
//----------------------------------------------------------------------------//
procedure AppSys // XBase++ requirement
return
// -------------------
- Enrico Maria Giordano
- Posts: 7355
- Joined: Thu Oct 06, 2005 8:17 pm
- Location: Roma - Italia
- Contact:
- Antonio Linares
- Site Admin
- Posts: 37481
- Joined: Thu Oct 06, 2005 5:47 pm
- Location: Spain
- Contact: