Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Creating a Delphi Record Structure
Message
General information
Forum:
Visual FoxPro
Category:
Windows API functions
Environment versions
Visual FoxPro:
VFP 9
Miscellaneous
Thread ID:
00999765
Message ID:
01001241
Views:
25
Anatoliy,

Thanks for your response. Below is the structure that I am working with. I appreciate any direction that you can provide.

Doug

TScRec = record
Field01: array [0..6] of Char;
Field02: array [0..2] of Char;
Field03: array [0..30] of Char;
Field04: array [0..2] of Char;
Field05: array [0..30] of Char;
Field06: array [0..2] of Char;
Field07: array [0..30] of Char;
Field08: array [0..5] of Char;
Field09: array [0..18] of Char;
Field10: Boolean;
Field11: array [0..35] of Char;
Field12: array [0..2] of Char;
Field13: array [0..5] of Char;
Field14: array [0..55] of Char;
Field15: array [0..4] of Char;
Field16: array [0..4] of Char;
Field17: array [0..4] of Char;
Field18: array [0..4] of Char;
Field19: array [0..4] of Char;
Field20: array [0..4] of Char;
Field21: array [0..4] of Char;
Field22: array [0..4] of Char;
Field23: array [0..4] of Char;
Field24: array [0..4] of Char;
Field25: array [0..4] of Char;
Field26: array [0..55] of Char;
Field27: array [0..55] of Char;
Field28: array [0..55] of Char;
Field29: array [0..55] of Char;
Field30: array [0..55] of Char;
Field31: Double;
Field32: Double;
Field33: Integer;
Field34: array [0..22] of Char;
end;

>Could you describe input and output parameters in this structure.
>
>In case of a simple structure, it's comparatively easy to assemble it in a FoxPro string. Then this structure can be passed by reference to your external function.
>
>An example:
>DECLARE INTEGER myfunction IN mylib.dll;
>STRING @thestructure
>
>
>Again, it depends on the structure's complexity, whether you need to use an API Structure class or just a "manual" assembling is enough.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform