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

Вниз

Помогите перевести с c++ в pas (Оочень маленький участок кода)   Найти похожие ветки 

 
Александр К   (2009-12-31 13:35) [0]


 char *t;

 for(; *t; t++) prog--;  //<---


Т.е. как организовать цикл, первое что пришло в голову:


var
 t: byte;
begin
 for t := 0 to Length(token) do dec(prog);


 
RWolf ©   (2009-12-31 15:04) [1]

t: pchar;

while t^<>#0 do begin
 dec(prog);
 inc(t)
end;


 
RWolf ©   (2009-12-31 15:07) [2]

ну, или
dec(prog,length(t))
:)



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

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

Наверх




Память: 0.46 MB
Время: 0.013 c
4-1229691321
Ort
2008-12-19 15:55
2010.03.07
Неправильно работает нажатие на клавиши


6-1214280494
Василий
2008-06-24 08:08
2010.03.07
WebBrowser отображение объектов


15-1261503380
xayam
2009-12-22 20:36
2010.03.07
Когда истина зависит от терминологии - часть 2


2-1261824983
Егорка
2009-12-26 13:56
2010.03.07
Таймер


15-1261435653
Piter
2009-12-22 01:47
2010.03.07
Отпуск с точки зрения ТК РФ