XProfan

Italia

Pedro
Santos

Hallo

Habe einen Proc weiss nicht mehr aber galube ist von Andreas Miethe womit ich die serielle ports im PC suche. Wenn ich das programm durch den Profan Inspector laufen lasse werden folgenden Fehler angezeigt:

Testata-Element ~Generic_read nicht gefunden
Testata-Element ~CreatFile nicht gefunden
Testata-Element ~Generic_write nicht gefunden
Testata-Element ~Open_Existing nicht gefunden
Testata-Element ~File_Attribute_Normal nicht gefunden
Testata-Element ~File_Flag_Overlapped nicht gefunden
Testata-Element ~Invalid_Handle_Value nicht gefunden
Testata-Element ~CloseHandle nicht gefunden

Kompilieren Markieren Separieren

proc search_coms

    coms& =@CREATE(LISTBOX,_DLG&,LISTBOX,52,33,120,140)
    ClearList
    X& = 1

    Whilenot X& = 51

        ComNome$ = \\.\COM+STR$(X&)
        ComHandle& = ~CreateFile(Addr(Comnome$),
        ~GENERIC_READ |
        ~GENERIC_WRITE,
        0,0,~OPEN_EXISTING,
        ~FILE_ATTRIBUTE_NORMAL |
        ~FILE_FLAG_OVERLAPPED,0)

        If ComHandle& <> ~INVALID_HANDLE_VALUE

            Addstring COM+STR$(X&)
            ~CloseHandle(ComHandle&)

        Endif

        Inc X&

    EndWhile

    Movelisttolist(coms&)
    sendmessage(coms&,$186,0,0)

Endproc

Weiss jemand wie die Fehler fixen kann?

Danke
Gruss
Pedro

Windows XP Home
Xprofan 10

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Jörg
Sellmeyer

Hast Du denn auch die Windows.ph korrekt eingebunden?

Habs gerade mal getestet - Was ich viel merkwürdiger finde ist die Fehlermeldung, daß SUBLANG_SYS_DEFAULT nicht vorhanden sei, obwohl die Konstante gar nicht im Code auftaucht und in der Headerdatei vorhanden ist

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

17.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Pedro
Santos

Hallo Jörg

Die Windows.ph wird doch automatisch von xpse eingebunden, oder nicht?

Gruss
Pedro

Windows XP Home
Xprofan 10

18.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Jörg
Sellmeyer

Hm - Du hast aber nicht dazugeschrieben, daß Du XPSE verwendest. Vielleicht hat iF die Konstanten ja noch nicht im XPSE eingebaut.

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

18.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Richtig, XPSE kann nie alle Konstanten kennen, binde einfach zusätzlich die Headerdatei ein mit include windows.ph oder $H windows.ph ein.

XPSE vermischt seine Datenbasis mit dem Headerfile.

18.03.2008 ▲

Vollständiges Zitat

Absatzweise Citazione Zeilenweise Citazione

Sebastian
König

Noch kurz als Ergänzung: Der ProfanInspector versteht nur reinen

XProfan-Code ohne die XPSE-Elemente - bei der Verwendung von XPSE sollte der Inspector also nur auf dessen Ausgabe losgelassen werden. Natürlich enthält XPSE selbst auch schon eine Syntax-Prüfung, aber doppelt hält ja manchmal besser