"Christian Schmitz" <sup****t@[EMAIL PROTECTED]
> wrote in message
news:1if9dua.wz71l71w1dghxN%sup****t@[EMAIL PROTECTED]
> Raoul Watson <WatsonR@[EMAIL PROTECTED]
> wrote:
>
>> I know that someone will suggest to get rid of OS specific calls (or
>> write
>> your own function) but just looking at my simplest VB 6 code, I have at
>> least 10 or 15 Win API calls... So unless you are dealing with Mickey
>> Mouse
>> programs like "hello world", a comparison of functions is an excellent
>> and
>> much needed resource.
>
> The impression i had with VB was that you need WinAPI calls everywhere
> because the framework is so limited.
>
> So with RB you may just ask here, but don't be suprised if a lot of
> functions are just built in.
>
> Gruß
> Christian
>
OK.. I don't have any knowledge about RB and perhaps a simple answer to
this
will allow me to make an intelligent decision about buying it..
If anyone can show me how this equivalent code may look in RB
I greatly appreciated
Assuming I have these two functions in VB, how would one use it in RB
and how I can convert it so that it can be reproduced with similar
results on the Mac:
The first one, makes a Window transparent:
msg = GetWindowLong(hWnd, GWL_EXSTYLE)
msg = msg Or WS_EX_LAYERED
SetWindowLong hWnd, GWL_EXSTYLE, msg
SetLayeredWindowAttributes hWnd, 0, Perc, LWA_ALPHA
The functions called are obviously Win API's.
The second one, is a Windows API to get the drive type:
Declare Function GetDriveType Lib "kernel32" Alias "GetDriveTypeA" (ByVal
nDrive As String) As Long
( Removable =2, Remote = 4, RAMdisk = 6, Fixed disk = 3, CD Rom = 5, etc.)
This is where the conversation regarding having a table of similar
functions
between the different platform would make sense. How am I going to do this
on the MAC if I have no clue about the MAC OS toolbox calls / functions?
And I can find thousands more in my code which i would have no clue what
so
ever on how to ****t it into RB environment.
|
