Hello community
I have a problem on having compiled SlePic  appears [Error]  ALK2102: 
unresolved external symbol CLICKDATE
Since I solve this?

Thank you
Ribo Salamanca

There should be a program clickdate.prg in the zip link it in you will
also need clickdate.ch in you development area.

Alternatively you can simply look for clickdate() call in the source and
remove it.

The click date is an addon that shows calendar if you press the ctrl-c key.

Jim

RIBO SALAMANCA wrote:
> Hello community
> I have a problem on having compiled SlePic  appears [Error]  ALK2102:
> unresolved external symbol CLICKDATE
> Since I solve this?
> 
> Thank you
> Ribo Salamanca

Thank you Jim

Marvellous component, can I ask you to near other programs that come in link 
zip, where I find mas information of as like using them?

Cordial greeting
Ribo

"James Loughner" <jwrl@suddenlink.net> escribió en el mensaje de 
noticias:282757e3$2874a530$a3c@news.alaska-software.com...
> There should be a program clickdate.prg in the zip link it in you will
> also need clickdate.ch in you development area.
>
> Alternatively you can simply look for clickdate() call in the source and
> remove it.
>
> The click date is an addon that shows calendar if you press the ctrl-c 
> key.
>
> Jim
>
> RIBO SALAMANCA wrote:
>> Hello community
>> I have a problem on having compiled SlePic  appears [Error]  ALK2102:
>> unresolved external symbol CLICKDATE
>> Since I solve this?
>>
>> Thank you
>> Ribo Salamanca

For the most part they are drop in replacements for XBP classes. Also
there is normally an example test code at the top of each prg

Jim



RIBO SALAMANCA wrote:
> Thank you Jim
> 
> Marvellous component, can I ask you to near other programs that come in
> link zip, where I find mas information of as like using them?
> 
> Cordial greeting
> Ribo
> 
> "James Loughner" <jwrl@suddenlink.net> escribió en el mensaje de
> noticias:282757e3$2874a530$a3c@news.alaska-software.com...
>> There should be a program clickdate.prg in the zip link it in you will
>> also need clickdate.ch in you development area.
>>
>> Alternatively you can simply look for clickdate() call in the source and
>> remove it.
>>
>> The click date is an addon that shows calendar if you press the ctrl-c
>> key.
>>
>> Jim
>>
>> RIBO SALAMANCA wrote:
>>> Hello community
>>> I have a problem on having compiled SlePic  appears [Error]  ALK2102:
>>> unresolved external symbol CLICKDATE
>>> Since I solve this?
>>>
>>> Thank you
>>> Ribo Salamanca 
>

Jim


 You can clarify me as I incorporate the class ProgressBar in this example,
 volume Min initiates with the record with 1 and Max with RecCount() to
 read the whole database.

 But I do not obtain results.


 ASize: = {400,70}  horizontal
 oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
 nColor)
 DO WHILE! Eof()
        SKIP
         IncProgress (oProgDlg)
 ENNDO

 OProgDlg:Destroy()
 oProgDlg: = NIL

 Thank you
 Ribo

My guess is that since you are using appdesktop() as parent the dialog
may be under you main dialog try using odlg:drawingarea for the parent
where odlg is a reference to you main dialog window.

Jim

RIBO SALAMANCA wrote:
> Jim
> 
> 
> You can clarify me as I incorporate the class ProgressBar in this example,
> volume Min initiates with the record with 1 and Max with RecCount() to
> read the whole database.
> 
> But I do not obtain results.
> 
> 
> ASize: = {400,70}  horizontal
> oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
> nColor)
> DO WHILE! Eof()
>        SKIP
>         IncProgress (oProgDlg)
> ENNDO
> 
> OProgDlg:Destroy()
> oProgDlg: = NIL
> 
> Thank you
> Ribo
> 
>

hi Ribo
   oK1 :=ProgressBar():new( oParent, oOwner, aPos, aSize, aPP, lVisible, 
nPo, nDesp )
  /////  oParent it must the xbpstatic ( o lo que sea ) where you put the 
progressbar
   oK1:create()
   oK1:minimum  := 1
   oK1:current     := 1
   oK1:maximum :=lastRec()
   dbGoTOP()
  While ( !Eof() )
     oK1:Increment()
     dbSkip()
  EndDO
................
the class progressbar is in the example of alaska


regards



"RIBO SALAMANCA" escribió en el mensaje de noticias 
news:10a71b17$50eb1106$3242@news.alaska-software.com...
> Jim
>
>
> You can clarify me as I incorporate the class ProgressBar in this example,
> volume Min initiates with the record with 1 and Max with RecCount() to
> read the whole database.
>
> But I do not obtain results.
>
>
> ASize: = {400,70}  horizontal
> oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
> nColor)
> DO WHILE! Eof()
>        SKIP
>         IncProgress (oProgDlg)
> ENNDO
>
> OProgDlg:Destroy()
> oProgDlg: = NIL
>
> Thank you
> Ribo
>
>
>

Yes but I think he was using my mod of the Alaska code because he was
using my function wrappers. My code places the bar on a dialog.

Jim

Jorge L wrote:
> hi Ribo
>   oK1 :=ProgressBar():new( oParent, oOwner, aPos, aSize, aPP, lVisible,
> nPo, nDesp )
>  /////  oParent it must the xbpstatic ( o lo que sea ) where you put the
> progressbar
>   oK1:create()
>   oK1:minimum  := 1
>   oK1:current     := 1
>   oK1:maximum :=lastRec()
>   dbGoTOP()
>  While ( !Eof() )
>     oK1:Increment()
>     dbSkip()
>  EndDO
> ................
> the class progressbar is in the example of alaska
> 
> 
> regards
> 
> 
> 
> "RIBO SALAMANCA" escribió en el mensaje de noticias
> news:10a71b17$50eb1106$3242@news.alaska-software.com...
>> Jim
>>
>>
>> You can clarify me as I incorporate the class ProgressBar in this
>> example,
>> volume Min initiates with the record with 1 and Max with RecCount() to
>> read the whole database.
>>
>> But I do not obtain results.
>>
>>
>> ASize: = {400,70}  horizontal
>> oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
>> nColor)
>> DO WHILE! Eof()
>>        SKIP
>>         IncProgress (oProgDlg)
>> ENNDO
>>
>> OProgDlg:Destroy()
>> oProgDlg: = NIL
>>
>> Thank you
>> Ribo
>>
>>
>>
> 
>

Jim
It happens that it visualizes the process but exceeds 100 % and the bar runs 
asynchronous, that is to say comes ultimately without having come to the 
last record.

Give me a track please. That I am doing badly.

Ribo

"James Loughner" <jwrl@suddenlink.net> escribió en el mensaje de 
noticias:19554712$60e04f32$1aea@news.alaska-software.com...
> Yes but I think he was using my mod of the Alaska code because he was
> using my function wrappers. My code places the bar on a dialog.
>
> Jim
>
> Jorge L wrote:
>> hi Ribo
>>   oK1 :=ProgressBar():new( oParent, oOwner, aPos, aSize, aPP, lVisible,
>> nPo, nDesp )
>>  /////  oParent it must the xbpstatic ( o lo que sea ) where you put the
>> progressbar
>>   oK1:create()
>>   oK1:minimum  := 1
>>   oK1:current     := 1
>>   oK1:maximum :=lastRec()
>>   dbGoTOP()
>>  While ( !Eof() )
>>     oK1:Increment()
>>     dbSkip()
>>  EndDO
>> ................
>> the class progressbar is in the example of alaska
>>
>>
>> regards
>>
>>
>>
>> "RIBO SALAMANCA" escribió en el mensaje de noticias
>> news:10a71b17$50eb1106$3242@news.alaska-software.com...
>>> Jim
>>>
>>>
>>> You can clarify me as I incorporate the class ProgressBar in this
>>> example,
>>> volume Min initiates with the record with 1 and Max with RecCount() to
>>> read the whole database.
>>>
>>> But I do not obtain results.
>>>
>>>
>>> ASize: = {400,70}  horizontal
>>> oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
>>> nColor)
>>> DO WHILE! Eof()
>>>        SKIP
>>>         IncProgress (oProgDlg)
>>> ENNDO
>>>
>>> OProgDlg:Destroy()
>>> oProgDlg: = NIL
>>>
>>> Thank you
>>> Ribo
>>>
>>>
>>>
>>
>>

Maybe that is an older version I use this one all the time



RIBO SALAMANCA wrote:
> Jim
> It happens that it visualizes the process but exceeds 100 % and the bar
> runs asynchronous, that is to say comes ultimately without having come
> to the last record.
> 
> Give me a track please. That I am doing badly.
> 
> Ribo
> 
> "James Loughner" <jwrl@suddenlink.net> escribió en el mensaje de
> noticias:19554712$60e04f32$1aea@news.alaska-software.com...
>> Yes but I think he was using my mod of the Alaska code because he was
>> using my function wrappers. My code places the bar on a dialog.
>>
>> Jim
>>
>> Jorge L wrote:
>>> hi Ribo
>>>   oK1 :=ProgressBar():new( oParent, oOwner, aPos, aSize, aPP, lVisible,
>>> nPo, nDesp )
>>>  /////  oParent it must the xbpstatic ( o lo que sea ) where you put the
>>> progressbar
>>>   oK1:create()
>>>   oK1:minimum  := 1
>>>   oK1:current     := 1
>>>   oK1:maximum :=lastRec()
>>>   dbGoTOP()
>>>  While ( !Eof() )
>>>     oK1:Increment()
>>>     dbSkip()
>>>  EndDO
>>> ................
>>> the class progressbar is in the example of alaska
>>>
>>>
>>> regards
>>>
>>>
>>>
>>> "RIBO SALAMANCA" escribió en el mensaje de noticias
>>> news:10a71b17$50eb1106$3242@news.alaska-software.com...
>>>> Jim
>>>>
>>>>
>>>> You can clarify me as I incorporate the class ProgressBar in this
>>>> example,
>>>> volume Min initiates with the record with 1 and Max with RecCount() to
>>>> read the whole database.
>>>>
>>>> But I do not obtain results.
>>>>
>>>>
>>>> ASize: = {400,70}  horizontal
>>>> oProgDlg: = StartProgress (Appdesktop (), aSize, Recno (), Reccount (),
>>>> nColor)
>>>> DO WHILE! Eof()
>>>>        SKIP
>>>>         IncProgress (oProgDlg)
>>>> ENNDO
>>>>
>>>> OProgDlg:Destroy()
>>>> oProgDlg: = NIL
>>>>
>>>> Thank you
>>>> Ribo
>>>>
>>>>
>>>>
>>>
>>>