Конвертирования переменной из OleVariant в String

← →
Canord © (2008-05-19 10:57) [0]

Удалено модератором
Примечание: СПАМ

← →
Сергей М. © (2008-05-19 11:06) [1]

А что показывает отладчик ?

← →
Canord © (2008-05-19 11:15) [2]

данных приходят челиком это можно судить по из длине

← →
Canord © (2008-05-19 11:16) [3]

отладчик ничего не выводит

← →
Сергей М. © (2008-05-19 11:29) [4]

> данных приходят челиком

Я не спрашиваю, откуда они у тебя приходят и куда уходят)

> отладчик ничего не выводит
>

Быть того не может.
Поймай брейкпойнт на строчке s := MyOLEVariantVariable, наведи курсор мыши на MyOLEVariantVariable - отладчик обязан хоть как-то отреагировать

← →
Canord © (2008-05-19 11:36) [5]

тоже самое дословно ????????еф???????

← →
Сергей М. © (2008-05-19 11:37) [6]

> тоже самое дословно

Чегоооо ???

← →
Canord © (2008-05-19 11:40) [7]

отладчик показывает в переменной знаки вопроса

← →
Сергей М. © (2008-05-19 11:43) [8]

А говоришь ничего не выводит)

Тогда приводи сюда значение TVarData(MyOLEVariantVariable).VType и дамп данных, на которые указывает TVarData(MyOLEVariantVariable).VPointer

т.е. так ?

var
pr: Pointer;
s: String;

pr:=TVarData(olevariant).VPointer;
s:=String(pr);

Я дамп памяти у тебя спрашиваю, а не знаки вопросов, которые я уже видел)

Попробую описать проблему подробнее...

Пишу приложение типа клиент-сервер на MS ActiveX Winsock 6.0 (необходимо обязательно использовать именно Winsock)

Winsock передает данные только в формате OleVariant и соответственно в таком и принимает...

// Клиент передача...

procedure TForm1.btnSendClick(Sender: TObject);
var
ov: OleVariant;
begin
ov:="1234567890";
Winsock1.SendData(ov);
end;

// Сервер Событие приема данных

procedure TForm1.Winsock1DataArrival(ASender: TObject; bytesTotal: Integer);
var
ov: OleVariant;
sTmp: String;
wf: WideString;
begin
Winsock1.GetData(ov);
sTmp:=String(ov);
//Пробывал и такой вариант не помагает
//wf:=ov;
//sTmp:=VarToWideStr(wf);
// Результат ?????(знаки вопроса)
end;

Дело в том что данные приходят в неизвесной кодировке

Как правильно перевести данные из OleVariant в String?

Конвертирования переменной из OleVariant в String Найти похожие ветки