Вниз
Скачать: CL | DM;

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

← →
Demo ©   (2003-01-04 19:50) [0]

где ошибка перемещает тока последний ыайл с списка

void __fastcall TForm2::SpeedButton7Click(TObject *Sender)
{
MkDir(d);

for (f=0;f=CheckListBox1->Items->Count-1;f++)
{
change_file_name();
AnsiString newadr = d+"\\"+fs;
MoveFile(fs.c_str(),newadr.c_str());
if(f==CheckListBox1->Items->Count-1)
Form3->ProgressBar1->Position+1;
}
}


← →
RWolf   (2003-01-04 19:55) [1]

распиши change_file_name()
сдается мне, что fs на протяжении всего цикла не меняется


← →
ZrenBy ©   (2003-01-04 19:57) [2]

>>f=CheckListBox1->Items->Count-1

f<=CheckListBox1->Items->Count-1


← →
RWolf   (2003-01-04 19:59) [3]

>>>ZrenBy

:)))))))
вот за это я и не люблю С ;)


← →
Demo ©   (2003-01-04 20:04) [4]

void change_file_name()
{
f_n=Form2->CheckListBox1->Items->Strings[f-1];
int i=AnsiPos("-",f_n)+5;
int g=i-StrToInt(f_n.Length());
fs = f_n.SubString(i,f_n.Length()-i+1);
}


← →
Demo ©   (2003-01-04 20:06) [5]

я просто хочу вытащить имя файла из всей строки адреса


← →
RWolf   (2003-01-04 20:10) [6]

есть мнение, что функция change_file_name()
и слыхом не слыхивала о _локальной_ переменной f
;)


← →
RWolf   (2003-01-04 20:11) [7]

впрочем, вру, все ОК ;)


← →
Demo ©   (2003-01-04 20:13) [8]

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit2.h"
#include "Unit3.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
String Ansi_pos;
AnsiString d="C:\\мля\\мля";
AnsiString f_n,fs;
int f;
TStringList *List = new TStringList();
слыхала слыхала


← →
RWolf   (2003-01-04 20:14) [9]

в любом случае, ошибку уже нашли :)


← →
Demo ©   (2003-01-04 20:15) [10]

где???


← →
RWolf   (2003-01-04 20:15) [11]

см. пост №3


← →
Demo ©   (2003-01-04 20:18) [12]

Удалено модератором
Примечание: OffTopic


← →
RWolf   (2003-01-04 20:21) [13]

Удалено модератором
Примечание: OffTopic


← →
Demo ©   (2003-01-04 20:23) [14]

Удалено модератором
Примечание: OffTopic


← →
RWolf   (2003-01-04 20:25) [15]

это на forum.ixbt.com


← →
Demo ©   (2003-01-04 20:27) [16]

Спасибо



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

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.009 c
1-49024
boby_g
2003-01-07 17:37
2003.01.16
Вопрос о компонентом TEdit


3-48929
D-NICKNAME
2002-12-21 00:25
2003.01.16
Заполнение базы.


14-49245
Андрусь
2002-12-26 11:29
2003.01.16
Как работать с форматом ASN.1


1-49110
Alex S
2003-01-04 15:15
2003.01.16
Взаимодействие с MS Office


3-48925
donda
2002-12-16 00:42
2003.01.16
как прописать свои события?




   Наверх