Windows programming

[Peter]

Deleted

[Charles Pegge]

Will do! Thanks Peter.

Charles

[Charles Pegge]

Peter,

I checked low level bind for CreateFont and found it worked correctly but I agree that declaring this function is more satisfactory.

Code: [Select]

a=fw_bold or fw_light
hFont = CreateFont (80,16,0,0,a,0,0,0,0,0,0,0,0,"times")

With low level binding:

1 You are restricted to passing variable and constants of the matching type.

2 Array variables, Functions and expressions cannot be passed as parameters.

3 Dynamic strings must be passed with the correct indirection - usually *string.

4 There is no automatic check that the binding was successful (typos etc).

Charles

[Charles Pegge]

Ah yes,

you need alias CreateFontA for ansi fonts

Code: [Select]

CreateFont       CreateFontA

You can check for run time errors after binding like this

Code: [Select]

string e
e=error
if e then
  print e
  '... termination procdures
end if

if there is a runtime problem then error() returns a string listing the errors then automatically clears the error buffer.

Charles