Copyfile

← →
exe2k © (2008-04-01 15:41) [0]

Здравствуйте) это снова я с очередным нубским вопросом....
у меня COPYFILE не хочет копировать файлы. ошибок не выдает. "копирует" в существующую папку(это проверяется) но файлов в ней нет.
ProjectFD - глбальная переменная.
{copy} copyfile(pchar(list.Items.ValueFromIndex[list.ItemIndex+1]),PCHAR(projectFD+"\smile" +inttostr(lol+1)+".gif"),false);

← →
Джо © (2008-04-01 15:43) [1]

copyfile — функция.

← →
Reindeer Moss Eater © (2008-04-01 15:44) [2]

Гетластеррор скажет в чем дело

← →
exe2k © (2008-04-01 15:52) [3]

извините..я вобще чето туплю сегодня(( разобрался , проблема в том что у меня код который выше шел в цикле.
проблема с переменной LoL. она не увеличивалась, и с самим циклом.
исправил:
for cnt := 0 to list.Items.Count-1 do begin {copy} lol:=lol+1; copyfile(pchar(list.Items.strings[list.ItemIndex+1]),PCHAR(projectFD+"\smile" +inttostr(lol)+".gif"),True); pb.Position := pb.Position +1; end;

мда.....

if copyfile(....) then inc(lol)

да знаю я что нуб)))

Copyfile Найти похожие ветки