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

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

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

Int64 как Integer

F$ © (2010-03-31 15:27:00)
в программе нужно сохранять в переменные размеры 2-х стримов. возможна ли ошибка, если я буду сохранять размеры (Int64) в TPoint.

P: TPoint; P := Point(Stream1.Size, Stream2.Size);

12 (2010-03-31 16:00:00) [1]
аа там 2 раза по int64..
тогда - свой тип

Демо (2010-03-31 16:00:00) [2]
И функцию соответствующую добавь. Например

function SizeStreams(Size1,Size2: Int64): TSizeStreams; begin Result.Stream1 := Size1; Result.Stream2:= Size2; end;

Демо (2010-03-31 15:59:00) [3]

> > Не смущеает, чтоtype TPoint = packedrecord X: Longint;
> > Y: Longint;end;А Stream1.Size - Int64Я вообщем-то из-
> за этого и парюсь.

Ну если тебе так нужно в одну сьрукткру сохранять, так создай её и всё.
Смысл раздумывать об этом?

TSizeStreams=record Stream1,Stream2: Int64; end;

F$ (2010-03-31 15:53:00) [4]

> Не смущеает, чтоtype TPoint = packedrecord X: Longint;
> Y: Longint;end;А Stream1.Size - Int64

Я вообщем-то из-за этого и парюсь.

12 (2010-03-31 15:50:00) [5]
Int64 = 2раза по Longint

Демо (2010-03-31 15:41:00) [6]

> F$ (31.03.10 15:27)

Не смущеает, что
type TPoint = packedrecord X: Longint; Y: Longint; end;

А Stream1.Size - Int64

12 (2010-03-31 15:40:00) [7]
а навсякий может свой пойнт объявить, где не Longint а Longword сказать

12 (2010-03-31 15:38:00) [8]
имхо нормально

Наверх

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