Найдено 4 результата

JackVlg
13.04.2009 09:54:04
Форум: Общее
Тема: ЕСТЬ!!! HTTP и SOAP реализация под MSDOS
Ответы: 1
Просмотры: 8202

Re: ЕСТЬ!!! HTTP и SOAP реализация под MSDOS

Вот пример вызова:

Код: Выделить всё

  S := '<arg0>0</arg0>';
  S := S + '<arg1>TUTU</arg1>';

  FullXML := nil;
  Res := InvokeSOAPMethod('172.16.1.195', 8080, '/Core-CoreEJB/Settings', 'getSettings', S, FullXML);
  FullXML.Free;

JackVlg
08.04.2009 22:02:18
Форум: Общее
Тема: ЕСТЬ!!! HTTP и SOAP реализация под MSDOS
Ответы: 1
Просмотры: 8202

ЕСТЬ!!! HTTP и SOAP реализация под MSDOS

По необходимости создал библиотеки: InetSockets, HttpHeader, HttpClient, SoapClient под операционку MSDOS(Go32) (под PC/TCP драйвер для поддержки стека протоколов TCP/IP). Разумеется реализация спецификаций не полная (далеко не полная)(да и xml запроса строить самим придется), но из DOSового ...
JackVlg
20.03.2009 18:06:22
Форум: Free Pascal Compiler
Тема: Нашел глюк в компиляторе
Ответы: 4
Просмотры: 4267

Re: Нашел глюк в компиляторе

Вот полный код:

Uses
Crt;

type
ZM = packed record
V &#58; byte;
A &#58; byte;
end;

var
vscreen &#58; array&#91;0&#46;&#46;24, 0&#46;&#46;79&#93; of ZM absolute segb800&#58;0;

procedure MyWriteln(Y &#58; integer; S &#58; string);
var
I &#58; byte;
begin
for I &#58;= 1 to Length(S) do ...
JackVlg
20.03.2009 15:31:08
Форум: Free Pascal Compiler
Тема: Нашел глюк в компиляторе
Ответы: 4
Просмотры: 4267

Нашел глюк в компиляторе

Нашел фишку тут в компиляторе версии 2.2.2
Неправильно работает индексация символов в строке:

for i &#58;= 1 to length(s) do write(s&#91;i&#93;);

Глюк проявляется при включении опции "Level 3 Optimization"

Добавлено спустя 2 минуты 8 секунд:

Неправильно работает индексация символов в ...