Явное пеобразоварие типов... - Форум на исходниках

WWW.ИСХОДНИКИ.РУ cpp.sources.ru

java.sources.ru web.sources.ru soft.sources.ru

jdbc.sources.ru asp.sources.ru api.sources.ru

  Форум на исходниках
  Delphi
  Явное пеобразоварие типов...
СПРОСИТЬ  ОТВЕТИТЬ
профайл | регистрация | faq

Автор Тема:   Явное пеобразоварие типов...

BadHabit опубликован 30-11-2000 13:42 MSK
Мне интересно, как в дельфи преобразовать запис в поток Char'ов, в С++ это сделать можно следующим образом :
//-------------------
struct _Aaa{
char abc[0x20];
char abc2[0x20];
char abc3[0x20];
}aaa;
int main
{
...
char * uk = (char *)&aaa;
...
...
for(int k=0; k<sizeof(_Aaa); k++)
uk[k] = ....//<any thing>;
}

//-------------------
, можно ли так сделать в Делфи???
И ещё есть тут что-нибудь похожее на (*void)???

Fly опубликован 01-12-2000 12:28 MSK
http://dnteam.al.ru
purpe опубликован 01-12-2000 12:43 MSK
Fly, ты это к чему ???
чего ты кидаешь ссылку на пустую страничку ???
. странный ты какой-то ......
unicorn опубликован 03-12-2000 17:14 MSK
type
TRange1 = 0..$20;
TCharArray1 = array [TRange1] of char;
TCharArraysRecord = record
a, a1, a2: TCharArray
end;
TRange2 = 0..$63;
TCharArray2 = array [TRange2] of char;
var
CharArraysRecord: TCharArraysRecord;
CharArray2 : TCharArray2;
begin
TCharArray2(CharArraysRecord)[3] := 'x'
end.
{
Вариант 2 ближе стилю C:
var
CharArraysRecord: TCharArraysRecord;
CharArray2: TCharArray2 absolute CharArraysRecord;
begin
CharArray2[3] := 'x'
end.
}
СПРОСИТЬ  ОТВЕТИТЬ
Перейти:

E-mail | WWW.ИСХОДНИКИ.RU

Powered by: Ultimate Bulletin Board, Freeware Version 5.10a
Purchase our Licensed Version- which adds many more features!
© Infopop Corporation (formerly Madrona Park, Inc.), 1998 - 2000.

Автор	Тема: Явное пеобразоварие типов...
BadHabit	опубликован 30-11-2000 13:42 MSK Мне интересно, как в дельфи преобразовать запис в поток Char'ов, в С++ это сделать можно следующим образом : //------------------- struct _Aaa{ char abc[0x20]; char abc2[0x20]; char abc3[0x20]; }aaa; int main { ... char * uk = (char )&aaa; ... ... for(int k=0; k<sizeof(_Aaa); k++) uk[k] = ....//<any thing>; } //------------------- , можно ли так сделать в Делфи??? И ещё есть тут что-нибудь похожее на (void)???
Fly	опубликован 01-12-2000 12:28 MSK http://dnteam.al.ru
purpe	опубликован 01-12-2000 12:43 MSK Fly, ты это к чему ??? чего ты кидаешь ссылку на пустую страничку ??? . странный ты какой-то ......
unicorn	опубликован 03-12-2000 17:14 MSK type TRange1 = 0..$20; TCharArray1 = array [TRange1] of char; TCharArraysRecord = record a, a1, a2: TCharArray end; TRange2 = 0..$63; TCharArray2 = array [TRange2] of char; var CharArraysRecord: TCharArraysRecord; CharArray2 : TCharArray2; begin TCharArray2(CharArraysRecord)[3] := 'x' end. { Вариант 2 ближе стилю C: var CharArraysRecord: TCharArraysRecord; CharArray2: TCharArray2 absolute CharArraysRecord; begin CharArray2[3] := 'x' end. }