Re: Using variables in insert field

Return to index

Author

Message

Peter

Posted: 01/11/2003 14:11:54

Long day. Sorry about that. My stuff up. fixed now...

regards, Peter

"Peter" <[email protected]> wrote in message

news:[email protected]...

> I have searched the posts and the demo's and hope I am not wasting your

time

> bit

>

> I am using the

> Var St1 : Pchar;

> begin

> Station := '';

> TagStr1 := '';

> Addtagbool := False;

> OKRightDlg.ShowModal;

>

> If AddTagBool then

>

>  Begin

> //station and tagstr are set to something in another form

>

>

> Station := Station + '.' + TagStr;

> For i := 1 to Length(station) do

> St1[i] := Station[i];

>

>

>

> RichViewEdit1.InsertStringTag(station + '.' + TagStr,

Integer(StrNew(St1)));

> RichViewEdit1.SetFocus;

>

>

> the app throws an access violation where I do the InsertStringTag.

>

>

> The interesting thing is if I change that line to

> RichViewEdit1.InsertStringTag('Wind speed km', Integer(StrNew('wsak')));

>

> and take out the code above it, it will insert the tag. If I then leave

that

> line there but reinsatll the code above it, the

>

> RichViewEdit1.InsertStringTag('Wind speed km', Integer(StrNew('wsak')));

>

> throws errors again.... So it is most what I am doing in the

>

> Station := Station + '.' + TagStr;

> For i := 1 to Length(station) do

> St1[i] := Station[i];

>

>

> but I cannot work it out.

>

>