Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Ошибка преобразований типов, для информации. Просьба проверить. [D6, Win2k]

sniknik © (2002-04-01 12:32:00)
Столкнулся со странной ошибкой в простой операции
St:= Ph;
St тип string, Ph PChar;
должно сработать приведение типов. и оно работает но значение Ph меняется! Чего в принцибе быть не должно. (к концу строки добавляется квадратик, ноль чтоли так отображается). в обшем я просто занес значение #0 туда, но возможно в другом Delphi или конфигурации это будет давать ошибку (у меня передается значение "com2" изза одной буквы все рушится).
просьба у кого пятый Delphi проверить (не переустанавливать же его изза такой ерунды).
заранее спасибо.

sniknik (2002-04-02 17:21:00) [1]
Не выдумываю и не ищу, просил проверить. А вы явно не проверяли. У меня значение xPort меняется, проверял в трассировке, до операции
Port:= xPort;
xPort = "com2"
после "com2# (вместо решетки квадратик скобка не закрыта)
я просто поставил следующей операцией
xPort:= PChar(Port);
и почти забыл об этом а вы так грубо в этом сомневаетесь.

если хотите воспроизвести ситуацию пожалуйста я уже разобрался, изменение происходит в том случае когда передается параметр сам в себя.
вот так, вызов
InitCOMPort(PChar(Port),Baud);
(это когда значения не задаются а берутся те что есть по умолчанию)
может в этом коде и есть какой криминал, я его не вижу. ведь другие значения (пример Baud: integer) нормально сохраняются без изменений.
(то что тип PChar указатель и значения передаются по ссылке можно не напоминать)

Anatoly Podgoretsky (2002-04-02 16:20:00) [2]
Сколько народу ищет ошибку на стороне

Digitman (2002-04-02 13:22:00) [3]
Не выдумывай небылиц, xPort не может поменяться "просто так", сам по себе. Где-то в коде, что ты явно не привел, есть обращения к буферу строки, на который ссылается xPort, по записи.

sniknik (2002-04-01 12:55:00) [4]
ну это пример
вот на самом деле
TDatMax = Class (TObject)
Port: String;
...

это St

а вот присвоение

function TDatMax.InitCOMPort(xPort:PChar; BaudRate:Integer): Boolean;
var
DCBv: TDCB;
TOv: COMMTIMEOUTS;
begin
Port:= xPort;
.....
вот после этого значение xPort меняется.

можно и Port сделать PChar и xPort стрингом. эт не вопрос. мне показалось проще восстановить значение, чтобы не менять везде.

watcher (2002-04-01 12:45:00) [5]
а может тот ph указывает на St ??
Как он инициализируеться ?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »