FiveTech Software tech support forums

... and generate the code for it: simply rename your RC file as rctoprg.rc and build rctoprg.prg If you keep your dialogs inside a DLL then replace GetInstance() for LoadLibrary( "yourdll.dll" ) This example and the new C code listed at the bottom will be included in next FWH build. rctoprg.prg ...

hi,

thx for Answer

the Link point to

How to keep a appl. on top of the dlg on resize ? (solved)

---

i got 2 Solution
1.) GetModuleFileName( GetInstance() )
2.) GetAppName()
where 2nd point to 1St

All, I just purchased a renew and received my copy of FiveWin 20.02 for Harbour. I am using Borland C++ 7.0. I tried using my mak file and got errors, I modified it based on build.bat and got errors. I replaced it with build.bat and got the following: Borland Resource Compiler Version 5.40 Copyright...

... is tricky and rarely necessary. From this I concluded that the classic way of using singleton technology, cannot be achieved by a direct call to GetInstance. The idea is to add a method, which I will call, internally raising the singleton instance. I made a test program with c #: class1.cs using ...

> oPOS := CREATEOBJECT("BluetoothConnector.GetInstance('TestConnectionDLL()' ) or something ?

o2 should be the oPOS you were looking for

... o1 := CreateObject( "PaymentService.BluetoothConnector" ) o2 := TOleAuto():New( o1:Invoke( "GetInstance" ) ) MsgInfo( ValType( o1 ) ) // -> "O" MsgInfo( ValType( o2 ) ) // -> "O" ////////////////////////////////////////////

Please try this:

local o1 := CreateObject( "PaymentService.BluetoothConnector" )
local o2 := TOleAuto():New( o1:Invoke( "GetInstance" ) )

... := CREATEOBJECT("PaymentService.BluetoothConnector") // ok MsgInfo( ValType( o1 ) ) // -> "O" local22 := o1:Invoke( "GetInstance" ) MsgInfo( ValType( local22 ) ) // N MsgInfo( str( local22 ) ) // 244252684 o2 := o1:GetInstance() // error MsgInfo( ValType( o2 ) ...

... o1 := CREATEOBJECT("PaymentService.BluetoothConnector") // ok MsgInfo( ValType( o1 ) ) // -> "O" o2 := o1:GetInstance() // error MsgInfo( ValType( o2 ) ) //////////////////////////////////////////// error.log Application =========== Path and name: G:\FWH_PRG\MetroTRG\metrotrg.exe ...

Also please try:

local o2 := o1:Invoke( "GetInstance" )

Please try this:

local o1 := CreateObject( "PaymentService.BuetoothConnector" )
local o2 := o1:GetInstance()

MsgInfo( ValType( o1 ) )
MsgInfo( ValType( o2 ) )

... they use a singleton pattern to manage and control instances of Bluetooth connections and suggest that I use the factory method BluetoothConnector.GetInstance (string serviceGuid) [ Mail ] Greeting, I am sending a reworked dll, it should work now. The problem was probably that COM registration ...

... procedure must return a true or false logical variable of the type function test() local oDlt, lCont cDbfPath:=cFilePath(GetModuleFileName( GetInstance() )) + "2013\dbf\" cExePath:= cFilePath(GetModuleFileName( GetInstance() )) * SET DEFAULT TO &cDbfPath RddSetDefault( "DBFCDX" ...

/ ??? Para que sirve, Silvio?
cIniFile := cFilePath( GetModuleFileName( GetInstance() ) ) + "tabledb.ini"

for save the state and other things

... only bitmaps\servizi\pattino.png I saw also filename.prg and not found a solution Function test() Local cIniFile := cFilePath( GetModuleFileName( GetInstance() ) ) + "Test.ini" Local cExePath := cFilePath( GetModuleFileName( GetInstance() ) ) Local cSerPath := GetIni( cIniFile, "Config", ...