Allgemeine Fragen zur PROFAN Programmierung

Views (Heute): 240780 (2216)

| Suchen
| Zurück zur Übersicht

Autor | Thema: Strukturen (nicht nur) v7.6
Michael Wodrich
| Datum:16.10.02 03:31 (profan@michael-wodrich.de) |
Hallo Roland, da wollte ich wohl gleich ein Bischen viel testen... (v7.6)
    Def %Max_Path 260

    Struct Win32_FileTime_Struct = dwLowDateTime&,dwHighDateTime&

    Struct Win32_Find_Data_Struct = dwFileAttributes&,\
                   FILETIME ftCreationTime,\        'nein
                   FILETIME ftLastAccessTime,\      'nein
                   FILETIME ftLastWriteTime,\       'nein
                   nFileSizeHigh&,nFileSizeLow&,\
                   dwReserved0&,dwReserved1&,\
                   cFileName$[ @Sub( %Max_Path, 1 ) ],\
                   cAlternateFileName$[ 13 ]
Mit deiner Lösung könnte ich die FILETIME-Struktur nur einmal einsetzen, da Namens-Kollisionen. (das obige Beispiel sollte aus WIN32.HLP übersetzt werden und mußte bei den nein's abgebrochen werden) oder habe ich einfach etwas übersehen? Kann ich bei solchen Strukturen eigentlich die Größe irgendwo abfragen? (SizeOf unter Pascal) Oder geht das nur per Handzählung und...
    Declare FFD#
    Def %Win32_FFD_Size 318   'hier handgezählt
    Struct Win32_Find_Data_Struct = (vererbte Structs)
    Dim FFD#,Win32_Find_Data_Struct  'hier autom. Größe

    BlockWrite #1,FFD#,0,%Win32_FFD_Size   'und hier benötigte Größe
Bisher habe ich das einfach immer abgezählt, aber wenn jetzt die Strukturen umfangreicher werden können, dann möchte man natürlich auch irgendwo die Größe erfragen können. Wie lösen die anderen Profaner eigentlich dieses kleine Problem? MfG Michael Wodrich -- Programmieren, das spannendste Detektivspiel der Welt.

| Zurück zur Übersicht