Search results for query: *

Hi, The code below will give you the number of years, months, days: Assuming Date1 and Date2 are 2 clarion dates (ie two long) NbYears#=Year(Date2)-Year(Date1) Date1=Date(Month(Date1),Day(Date1),Year(Date1)+nbYears#) NbMonth#=month(Date2) - month(Date1) If NbMonth# < 0 Then...

Hi, NETRemoteTOD is not really friendly with clarion apps... but there is other way to do this, you could use NetDDE, this will work with all versions of windows. 1: The server program Program Map Include('DDE.clw') . Include('Equates.clw') LOC:TheServerTime Long...

hi, If you give me an email address, i'll send you a C55g application to demonstrate how to do it. You will just need to change the name of the server in the code. Valery.

Hi, Have you tried ?MyVariable{PROP:Color} = COLOR:blue or ?MyVariable{PROP:FontColor} = COLOR:blue Valery.

Hi, There is a solution using some Api, but it does not work with Win9x. First you will need to make a lib for NETApi32.Dll (using libmaker in the bin directory of Clarion.), then add this library to your application (insert module... externalDLL). Then declare two external Functions in this...

Hi, If you are not using SomeCode START(myFunction) MoreCode but SomeCode MyFunction() MoreCode then you automatically wait for it to return before to proceed...

Hi, Have you tried to use Printer{PROPPRint:Device} to read or set the printer? OldPrinter String(50) OldPrinter = Printer{PROPPRint:Device} PRINTERDIALOG('Choose Printer') PrintConstancias2004(CONS:NUMDOCTO,CONS:FECHA_IMPRE) Printer{PROPPRint:Device} = OldPrinter You will need to add...

Hi, here is a solution. WordID = CREATE(0,CREATE:Ole) WordID{PROP:Create} = 'Word.Document' WordID{PROP:DoVerb} = -3 WordID{'Application.Visible'} = False WordID{'Application.Documents.Add' } WordID{'Application.Selection.Text'} = MyText WordID{'Application.ActiveDocument.CheckGrammar' } ...

Hi, If you use MASK as aproperty of the window then it works fine. Also for the entry pictures have a look at key in paterns in the help. This example work fine (a number followed by a capital letter.): MyWindow WINDOW('Caption'),AT(,,260,100),GRAY,MASK...

hi, There is only one provider of TPS ODBC driver, it is softvelocity and it is really expensive. http://www.softvelocity.com/products/pr_database_tsodbc.htm Valery.

Hi, It is possible to have dynamic arrays in Clarion but there is some limitations. The array can't be a global variable (i.e. : it has to be in a routine or a procedure.) I do it like that : Method 1 : I fisrt declare a global variable in my procedure DimArray Long Then in a routine ...

Hi, Common GPF sources are : - String slicing (ie MYString[i:j]), it is safer to use instring etc.. - 16 bits applications - Multithreaded Applications (specially if there if message is used a lot...) - ANY variables not set to NULL after use. - use of omittable parameters - use...

Hi, You can use Word to do it: WordId is a Long, MyText is a string WordID = CREATE(0,CREATE:Ole) WordID{PROP:Create} = 'Word.Document' WordID{PROP:DoVerb} = -3 WordID{'Application.Visible'} = False WordID{'Application.Documents.Add' } WordID{'Application.Selection.Text'} = MyText...

Hi, I have threads issues with the application I am working on, and this would help me but the link does not work do you know where I can find these sources? Thanks Valery.

You cant compare Access and Clarion. Access is really limited. Clarion is a proper programming language. It has problems and strenghs, but you can do a lot more with it than with Access. Comparing Access and Clarion is a bit like comparing Word VBA and C++. They are not the same tools and they...

Hi, C55 is not more difficult, it is a different. With the applications wizards you can write really quickly simple programs. Valery.

Hi, If I had to do this then I would use ACCEPT. In my main window I would do : ThreadNo = Start(MyComProcess) To stop it I would do on a button : Post(Event:closeWindow,,ThreadNo) and in myComProcess I would have : WindowWait WINDOW('Caption'),AT(-1,-1,0,0),GRAY,Timer(100) END...

Hi, Clarion 5.5 has this functionality built in, but not 5. You can also write your own export program, you can get the file structure by using the File Layout menu. Then creat a quick program with 2 files, the original one and an other one using ASCII as driver. just do a loop and copy each...

Hi, I think that Pervasive.SQL limits the length of a string to 254 caracters (??). Maybe you could try using a group : PervasiveTable FILE,DRIVER('Scalable'),CREATE Record RECORD,PRE() TheLongString GROUP Part1 STRING(250) Part2...

?List{PROP:Color,3} is the color of the selection bar ?List{PROP:Color,1} is the color of the background ?List{PROP:Color,2} is the color of the text If you do : ?List{PROP:Color,1} = Color:None ?List{PROP:Color,2} = Color:Black ?List{PROP:Color,3} = Color:White Then you will just have a...