Florian Klaempfl wrote 40 lines
wrote:
> On Wed, Jun 01, 2005 at 03:22:10PM +0200, Florian Klaempfl wrote:
>
>>Michael Van Canneyt wrote:
>>
>>
>>>
>>>On Wed, 1 Jun 2005 wrote:
>>>
>>>
>>>>Hi.
>>>>
>>>>Now I'm working on porting our Delphi database application (cca 100
>>>>000 lines) to FreePascal. I
>>>>have some little patches principally around TDataset. Where can I send
>>>>this patches?
>>>
>>>
>>>Send them to me.
>>>
>>>
>>>>Our application is now possible to translate in fpc, but first problem
>>>>was
>>>>unfunctional VarArrayCreate([0, 1], varVariant). Is here somebody who is
>>>>working on Variants or may I try to penetrate into source and try to
>>>>track down this bug?
>>>
>>>
>>>Maybe Jason Southwell is working on it, but go ahead and change whatever
>>>you think needs changing. Patches can be sent to me.
>>
>>VarArrayCreate should basically work with 2.0.0.
>
> Yes VarArrayCreate(..., varInteger) works, but VarArrayCreate(...,
> varVariant) emits "VarArray is locked".
> Unfortunately my knowledge about variants internals is zero.
Can you create a small example which shows the problem? BTW: Which OS do you
use? Win or other?
OS: Linux
fpc 2.1.1 from svn.
----------------------------------------------------------------
program pokus;
uses
Variants;
var
v: Variant;
begin
v := VarArrayCreate([0, 1], varVariant);
end.
----------------------------------------------------------------
emits EVariantBadVarTypeError : Invalid variant type
Sorry for "VarArray is locked" mistake. It was another problem.
Petr
Ing. Petr Kristan
.
EPOS PRO s.r.o., Bozeny Nemcove 2625, 530 02 Pardubice
tel: +420 466335223 Czech Republic (Eastern Europe)
fax: +420 466510709
