0
491
Question SomeBoDey CPS · Jan 9, 2020

VISM.OCX in Delphi

#Caché

Please suggest me.

I use delphi to develop and import VISM.OCX to component in delphi.

I run My Qurey Code in terminal get data many line but in VisM1.PLIST get data One line.

This is my code.
  VisM1.MServer := 'IP and Port My Server';
  VisM1.NameSpace := 'My Namespace';
  VisM1.Execute('My Qurey Code');

  VisM1.PLIST;

Discussion (4)0
Log in or sign up to continue

Comments

SomeBoDey CPS  Jan 12, 2020 to Eduard Lebedyuk

Why  VisM1.PLIST   get  data  single line.

I want data multiline.

Thank.

0
Vitaliy Serdtsev · Jan 13, 2020 
COS:

  <FONT COLOR="#0000ff">#include </FONT><FONT COLOR="#000000">%systemInclude
</FONT><FONT COLOR="#ff0000">main</FONT><FONT COLOR="#000000">()
  </FONT><FONT COLOR="#0000ff">s </FONT><FONT COLOR="#800000">PLIST</FONT><FONT COLOR="#000000">=2
  </FONT><FONT COLOR="#0000ff">s </FONT><FONT COLOR="#800000">PLIST</FONT><FONT COLOR="#000000">(1)=</FONT><FONT COLOR="#008000">"line 1"
  </FONT><FONT COLOR="#0000ff">s </FONT><FONT COLOR="#800000">PLIST</FONT><FONT COLOR="#000000">(2)=</FONT><FONT COLOR="#008000">"multiline 1"</FONT><FONT COLOR="#000000"></FONT><FONT COLOR="#0000ff">$$$NL</FONT><FONT COLOR="#000000"></FONT><FONT COLOR="#008000">"multiline 2"
  </FONT><FONT COLOR="#0000ff">q </FONT><FONT COLOR="#000000">1</FONT>
DELPHI:

procedure TForm1.Button1Click(Sender: TObject);begin
  VisM.Server:='cn_iptcp:127.0.0.1[1972]:_system:@SYS';
  VisM.NameSpace:='USER';
  VisM.Execute('$$main^dc');
  ListBox.Clear;
  ListBox.Items.Text:=VisM.PLIST;end;
Result:
line 1
multiline 1
multiline 2
0
Vitaliy Serdtsev · Jan 13, 2020

Also, I advise you to look at CacheActiveX instead of VisM, which has restrictions on the size of the transmitted data. Here is my old article on this subject: link to machine translation

0