program xXx;
var
i: integer;
s: string;
begin
writeln('lol')
write('podaj liczbę: ') // komentarz
read(i);
s:='ooo';
writeln(s) { komentarz < usunie ten znak? }
end.
<bcb>
TTopic * TDataLoader::getNextTopic() {
if (firstData->empty()) return 0;
if (firstData->count() < 11) return 0;
TTopic *topic = new TTopic();
topic->local_id = -1;
topic->remote_id = (*firstData)[0].toInt();
*topic->subject = (*firstData)[1];
*topic->user = (*firstData)[2];
topic->counter = (*firstData)[3].toInt();
topic->time = (*firstData)[4].toInt();
topic->reply = (*firstData)[5].toInt();
topic->last_time = (*firstData)[6].toInt();
*topic->last_user = (*firstData)[7];
topic->edit_time = (*firstData)[8].toInt();
topic->forum = (*firstData)[9].toInt();
topic->type = static_castTTopic::TopicType((*firstData)[10].toInt());
topic->visited = false;
firstData->erase(firstData->begin(), firstData->begin() += 11);
return topic;
}
</bcb>