Вверх ↑
Этот топик читают: Гость
Ответов: 44
Рейтинг: 3
#16: 2012-02-09 16:34:27 ЛС | профиль | цитата
Леонид писал(а):
Saget13, последняя попытка (картинки АВТОсохраняются в папке Scans под именами Scan1(Scan2....Scan9999999).jpg) myscan.rar

Просто огроменное спасибо!!!!
сейчас буду сидеть разбирать, как работает)
карма: 0

0
Ответов: 16884
Рейтинг: 1239
#17: 2012-02-10 10:06:00 ЛС | профиль | цитата
Леонид, из недокументированых возможностей
code_26814.txt
Барадак конечно.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_26814.txt [421B] [114]
Ответов: 8927
Рейтинг: 823
#18: 2012-02-10 10:14:12 ЛС | профиль | цитата
Tad, да уж! (увидел Tad ответил, думаю сейчас про лишний линк и Memory поизголяется )
карма: 19

0
Ответов: 16884
Рейтинг: 1239
#19: 2012-02-10 10:56:59 ЛС | профиль | цитата
Леонид писал(а):
про лишний линк и Memory
и GetDataEx решил промолчать
А вот про компонент Dir можно было бы. Не всегда exe лежит рядом. А если решат сбросить сразу на флешку или на другой диск ? Будем копировать exe ?
------------ Дoбавленo в 10.56:
Леонид,
Add(MainForm,2953706,35,112)
{
Width=162
link(onCreate,10257710:doFor,[])
}
Add(ListBox,1570011,252,189)
{
Left=35
Top=10
Width=80
Height=240
link(Str,11074821:Var2,[])
}
Add(For,10257710,91,126)
{
Start=1
End=100
link(onEvent,1492254:doString,[])
link(onStop,1570011:doAdd,[(130,139)(130,195)])
}
Add(FormatStr,1492254,140,126)
{
DataCount=1
Mask="D:ScanScan%1.jpg"
link(onFString,12799129:doConvert,[])
}
Add(Convertor,12799129,196,126)
{
Mode=10
link(onResult,796620:doOperation,[])
}
Add(Math,796620,252,126)
{
OpType=39
link(Op1,11074821:Var1,[(258,114)(246,114)(246,170)])
}
Add(GetDataEx,11074821,252,165)
{
link(Data,796620:Result,[])
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
19
Сообщение
...
Прикрепленные файлы
(файлы не залиты)