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

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

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

Использование FileWrite [D6, WinXP]

Vengrov © (2005-03-16 17:01:00)
Народ, подскажите, плиз. Что мне указать, чтобы этот код :

..
sCompanyInfo: String;

..
sCompanyInfo := 'Здесь обычная строка';
FileWrite (iFileHandle, sCompanyInfo, length(sCompanyInfo));
..
не выдавал из-за второго параметра :
EVariantTypeCastError
Could not convert variant of type (String) into type (Integer)

Anatoly Podgoretsky (2005-03-16 21:35:00) [1]
Vengrov (16.03.05 17:01)
Зачем тебе АПИ функция? Есть же Паскалевские текстовые файлы.
Write(F, sCompanyInfo);

begin...end (2005-03-16 20:27:00) [2]
> X_Tra © (16.03.05 20:24) [4]

- Вода кипит при 90 градусах!
- Нет, при 100!
- Да, извиняюсь. 90 градусов - это прямой угол.

:-)

X_Tra (2005-03-16 20:24:00) [3]
Сколько раз помню, как сталкивался с такой же ошибкой, всегда решалось через PChar, но тут проверил сейчас - действительно работает String!

ЗЫ: ой, это я с MessageBox перепутал...

Набережных С. (2005-03-16 20:10:00) [4]

> X_Tra © (16.03.05 18:58) [2]

"Брехня-а-а"©

X_Tra (2005-03-16 18:58:00) [5]
FileWrite не понимает String, лучше PChar или array of Char.
Можно написать так:
FileWrite (iFileHandle, PChar(sCompanyInfo), length(sCompanyInfo));

MBo (2005-03-16 17:10:00) [6]
sCompanyInfo[1]

Наверх

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