🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.lang.modula2
Article #2857

GPM for OS/2 FILEDLG Record.

#2857
From: HD Zuluaga
Date: Thu, 28 Sep 1995 07:35
38 lines
1466 bytes
Does anyone knows how to interface to the FILEDLG structure, I tryed
 to write an interface but it does not work.  This is what I did



TYPE
(*    APSZ = ARRAY [0..0] OF PSZ;
    PAPSZ = POINTER TO APSZ; *)
    PAPSZ = ADDRESS;

    FILEDLG = RECORD
        cbSize           : CARDINAL;
        fl               : CARDINAL;
        ulUser           : CARDINAL;
        lReturn          : INTEGER;
        lSRC             : INTEGER;
        pszTitle         : PSZ;
        pszOKButton      : PSZ;
        pfnDlgProc       : PFNWP;
        pszIType         : PSZ;
        papszITypeList   : PAPSZ;
        pszIDrive        : PSZ;
        papszIDriveList  : PAPSZ;
        hMod             : HMODULE;
        szFullFile       : ARRAY [0..CCHMAXPATH-1] OF CHAR;
        papszFQFilename  : PAPSZ;
        ulFQFCount       : CARDINAL;
        usDlgId          : USHORT;
        x                : SHORT;
        y                : SHORT;
        sEAType          : SHORT;
    END;


What is wrong, Any help apreciated. 

Thanks.  Hernan Dario.
Technical Details
Message-ID: <44dj8c$bje@hippo.shef.ac.uk>
Path: arc1-ca.pugleaf.net!news.shef.ac.uk!newsmaster@sheffield

Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!news.shef.ac.uk!newsmaster@sheffield
From: H.D.Zuluaga@shef.ac.uk (HD Zuluaga)
Newsgroups: comp.lang.modula2
Subject: GPM for OS/2 FILEDLG Record.
Date: 28 Sep 1995 07:35:40 GMT
Organization: Automatic Control & Systems Engineering, University of Sheffield , UK
Message-ID: <44dj8c$bje@hippo.shef.ac.uk>
NNTP-Posting-Host: pc021188.shef.ac.uk
X-Newsreader: WinVN 0.92.1