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

Вниз

Простой вопрос на который вы легко ответите   Найти похожие ветки 

 
Evg12   (2003-07-29 00:06) [0]

Уважаемые как в функцию Format(Dat_STR,[Dat_INT]) передать не заведомо известные данные, а Dat_STR - формируется динамически,
Dat_INT - таблица array of LongWord, тоже динамическая. И оба изначально неизвестны. (формируются в процессе работы программы).


 
default ©   (2003-07-29 00:34) [1]

используя ИМЕННО Format - не получится
даже надстройку, наверно, никакую не получиться сделать...
наверно придётся писать что-то своё если сильно нажо это


 
Rouse_ ©   (2003-07-29 00:40) [2]

Можно, например, так:

procedure TForm1.FormCreate(Sender: TObject);
const
Size = 3;
var
S, R:String;
Buf: array of LongWord;
I: Integer;
begin
SetLength(Buf, Size);
R := "";
S := "%u";
for I := 0 to Size - 1 do
begin
Buf[I] := I; // Симулируем заполнение
( S, [Buf[I]])
Можно, например, так:

procedure TForm1.FormCreate(Sender: TObject);
const
Size = 3;
var
S, R:String;
Buf: array of LongWord;
I: Integer;
begin
SetLength(Buf, Size);
R := "";
S := "%u";
for I := 0 to Size - 1 do
begin
Buf[I] := I; // Симулируем заполнение
R := R + Format(S, [Buf[I]]); // Выводим результат
end;
Caption := R;
end;


Желаю успехов


 
default ©   (2003-07-29 00:53) [3]

хе а смысл тут Format применять? IntToStr...


 
Rouse_ ©   (2003-07-29 01:27) [4]

IntToStr использует тот-же FmtStr что и Format, с которым и просили привести пример.

Желаю успехов



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
14-45020
Igor__
2003-07-28 20:35
2003.08.14
16BPP или 15BPP


14-45013
Леприкон
2003-07-29 07:33
2003.08.14
Цыгане...


14-44966
pasha_golub
2003-07-23 18:28
2003.08.14
Вот, сваял на скорую руку. Отведайте...


14-45010
Dimich1978
2003-07-28 21:31
2003.08.14
БО-БОльница


14-44981
Alles
2002-12-11 15:38
2003.08.14
TNMPopup