Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.06;
Скачать: CL | DM;

Вниз

string и array of char   Найти похожие ветки 

 
andrey_pst ©   (2003-09-23 10:45) [0]

объявлен тип
type
TMytype = array [1..4] of char;

есть запись, в которой есть поле вышеуказанного типа
type
TRec = record
p1 : real;
p2 : TMytype;
pt : integer;
end;
PRec = ^TRec;

Вопрос:
Чем можно заполнить поле p2(TMytype) , чтобы
после перевода p2 (TMytype) в строку str (string)
содержимое строки было равно "" (str = "")

Собственно нельзя ведь написать
for i := 0 to 4 do
MyRec.p2[i] := "";
это просто не откомпилируется
Нельзя также и не заполнять это поле, т.к. в итоге
в строке (str) получим случайный набор символов.

TRec и TMytype изменить не могу - они в dll стороннего производителя


 
PVOzerski ©   (2003-09-23 10:47) [1]

Начальный элемент сделать #0, конвертить сначала в pChar, потом в string.


 
Юрий Федоров ©   (2003-09-23 11:08) [2]

StrPCopy(p2, "");


 
Лёша ©   (2003-09-23 13:01) [3]

FillChar(MyRec.p2, SizeOf(MyRec.p2), #0);


 
Palladin ©   (2003-09-23 13:03) [4]

мда...
MyRec.p2[1]:=#0;


 
pasha_676 ©   (2003-09-23 13:03) [5]


> for i := 0 to 4 do
> MyRec.p2[i] := "";


Кстати, а почему нельзя. Просто интересно...


 
andrey_pst ©   (2003-09-23 13:06) [6]

спасибо, #0 - то, что надо

>> pasha_676 © (23.09.03 13:03) [5]
>> Кстати, а почему нельзя. Просто интересно...
потому, что TMytype - массив символов


 
Palladin ©   (2003-09-23 13:07) [7]

потому что char не может быть пустым...


 
Юрий Федоров ©   (2003-09-23 13:15) [8]

В общем случае (не обязательно пустая строка) - [2]
В частном (обязательно пустая строка) - [1], [4]



Страницы: 1 вся ветка

Текущий архив: 2003.10.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.021 c
3-18255
ksa2002
2003-09-10 07:27
2003.10.06
Inter Base 4-6 и D6


7-18649
CUTTER
2003-07-19 06:55
2003.10.06
Считывание информации со сканера для штрих-кодов


1-18294
Vt
2003-09-24 07:16
2003.10.06
Мастера почему не работает процедура Close. На onShow


1-18400
w666w
2003-09-25 17:25
2003.10.06
OnTreminate := SomeObj.SomeProc вместе с FreeOnTerminate := true;


7-18660
Opryshok
2003-07-23 11:22
2003.10.06
подскажите пожалуйста: как узнать %CPU USAGE