SnapModbus released /1.0.1/readme.txt

Vojko Cendak posted a comment on discussion General Discussion

Hi, 1. In TSnapMBBroker clas there are >string< parameters like address, . The problem it it should be >Ansistring< as in TSnapMBDevice ! Char * address got in dll only the first character of string ! we also implemented dynamic loading of dll in case dll is missing, because we also have other drivers in app. we dynamically load snap7.dll also If you're interested. Thank you and all the best, Vojko Cendak

Vojko Cendak posted a comment on discussion General Discussion

Hi, 1. In TSnapMBBroker clas there are »string« parameters like address, … The problem it it should be »Ansistring« as in TSnapMBDevice ! Char * address got in dll only the first character of string ! we also implemented dynamic loading of dll in case dll is missing, because we also have other drivers in app. we dynamically load snap7.dll also If you're interested. Thank you and all the best, Vojko Cendak

Peter Mortier posted a comment on discussion General Discussion

I am writing an application in which I use Snap7, not including the library but including the .h and .cpp into my Visual Studio project. Now I want to also use SnapModbus in the same application, also by including the .h and .cpp files. Has anyone done this before as I get a lot of errors as there are identical files. Thanks for guiding me in the right direction!

Christof Biner posted a comment on discussion General Discussion

Hallo I am trying to connect the DTSU666 via this small program in Lazarus/Freepascal: program TestDTSU666; Uses SnapMB, sysutils; var Regs: packed array[0..255] of word; Client_1 : TSnapMBBroker; begin Client_1 := TSnapMBBroker.Create; Client_1.AddDevice(sfRTU, 1, 'COM4', 9600, 'N', 8, 1, FlowNONE); WriteLn(IntToStr(client_1.Connect)); Client_1.ReadHoldingRegisters(1, $2004, 2, @Regs); WriteLn('A= '+ IntToStr(Regs[0])+ ' B= '+ IntToStr(Regs[1])); ReadLn; end. Result ist always: 0 A= 0 B= 0 No action....

Diego Milzani posted a comment on discussion General Discussion

I cannot test because i'm using c++ to do some tests with the library, but try to change: in procedure TForm1.FormShow ModbusBroker.AddDevice(mbTCP, 1, '10.0.90.22', 502); Cause the devId is the index (1) in the fieldcontroller and must be the same for all calls or use a single ethernet device and don't care the devid procedure TForm1.FormShow(Sender: TObject); begin ModbusBroker := TSnapMBBroker.Create(mbTCP, '10.0.90.22', 502); ModbusBroker.SetLocalParam(1, par_AutoTimeout, 1); Timer1.Enabled :=...

Toddie modified a comment on discussion General Discussion

Ich habe mal ein kleines Delphi-Testprogramm angehängt. Da bekomme ich nicht mal ein Connect zustande. Kann mir jemand sagen, was ich falsch mache ?? I once attached a small Delphi test program. I can't even get a connect there. Can anyone tell me what I'm doing wrong??

Toddie posted a comment on discussion General Discussion

Ich habe mal ein kleines Delphi-Testprogramm angehängt. Da bekomme ich nicht mal ein Connect zustande. Kann mir jemand sagen, was ich falsch mache ??

SnapModbus released /1.0.0/readme.md

SnapModbus released /1.0.0/SnapMB-full-1.0.0.7z