HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетупередача картинки (клиент-сервер) ← Ctrl12Ctrl →
Этот топик читают: Гость
Ответов: 1528
Рейтинг: 57
#1: 2011-12-05 09:57:28 ЛС | профиль | цитата
примеров чтото не нашёл.
сижу пока скорее всего велосипед изобретаю,
может кинет кто пример передачи картинки с клиента на сервер ?
карма: 0

0
Ответов: 4641
Рейтинг: 334
#2: 2011-12-05 10:21:02 ЛС | профиль | цитата
TCP_ServerTCP_Client

------------ Дoбавленo в 10.19:
вместо текста отправляешь данные и все тут.
hitman249, ну хоть попытки то были???
а примеров было полно.
------------ Дoбавленo в 10.21:
а пример sendfile из примеров это что? не пример?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 3889
Рейтинг: 362
#3: 2011-12-05 10:23:41 ЛС | профиль | цитата
hitman249 писал(а):
примеров чтото не нашёл.

ElementsdelphiExampleInternetSendPicture.sha
карма: 1

0
Ответов: 1528
Рейтинг: 57
#4: 2011-12-05 10:33:32 ЛС | профиль | цитата
Ravilr писал(а):
ну хоть попытки то были???

спасибо гугло-поиску за это
------------ Дoбавленo в 10.33:
прикрутить бы его к форуму "по умолчанию" - на порядок было бы меньше вопросов
карма: 0

0
Ответов: 3889
Рейтинг: 362
#5: 2011-12-05 10:51:11 ЛС | профиль | цитата
hitman249 писал(а):
прикрутить бы его к форуму "по умолчанию" - на порядок было бы меньше вопросов

Как показывает практика, вопросов меньше не становится даже когда примеры лежат прямо перед вопрошающими, на их собственных ПК:
1nd1g0 писал(а):
ElementsdelphiExampleInternetSendPicture.sha
карма: 1

0
Ответов: 1528
Рейтинг: 57
#6: 2011-12-05 11:11:13 ЛС | профиль | цитата
1nd1g0 писал(а):
Как показывает практика

hitman249 писал(а):
спасибо гугло-поиску

------------ Дoбавленo в 11.11:
без нормальной системы поиска, папка с примерами практически не приступна
карма: 0

0
Разработчик
Ответов: 26324
Рейтинг: 2147
#7: 2011-12-05 12:55:51 ЛС | профиль | цитата
hitman249 писал(а):
папка с примерами практически не приступна

Оригинально -- папка на собственном компе и неприступна Ну и народ пошел. Будут ломиться лбом в форум, засыпая его вопросами и жалобами, вместо того, чтобы прошерстить собственные папки
hitman249 писал(а):
без нормальной системы поиска

Ну и долби Автора проекта с этой жалобой, че ты других-то достаешь с этим, мы что ли делаем этот поиск
карма: 22

0
Ответов: 1376
Рейтинг: 198
#8: 2011-12-05 13:23:48 ЛС | профиль | цитата
hitman249 писал(а):
спасибо гугло-поиску
вот для микрооблегчения поиска
code_26066.txt
карма: 1

0
файлы: 1code_26066.txt [4.6KB] [166]
Ответов: 1528
Рейтинг: 57
#9: 2011-12-06 05:10:16 ЛС | профиль | цитата
nesco,
не я первый, тема обсуждалась ещё до меня

foksov,
[offtop]а теперь в виде плагина [/offtop]
------------ Дoбавленo в 05.10:
схема-вопрос
описание схемы
алгоритм режет скриншот рабочего стола на поле 8х8, у каждого из квадратиков рассчитывается md5
Add(MainForm,2953706,238,175)
{
 Height=435
}
Add(ScreenShort,16357142,637,343)
{
 link(onCapture,15737688:doLoad,[])
}
Add(Button,10184002,196,322)
{
 Left=10
 Top=5
 Data=String(gfdhfdhgf)
 link(onClick,9213231:doEvent1,[])
}
Add(Img_Copy,12379554,574,490)
{
 Point(Width)
 Point(Height)
 link(onCopy,1682770:doHashsum,[])
 link(Source,15737688:Bitmap,[(580,479)(685,479)])
 link(X,3321133:Result,[(587,474)(545,474)])
 link(Y,2603742:Result,[(594,468)(559,468)])
 link(Width,7629770:Var3,[(601,383)])
 link(Height,1101479:Var3,[(608,376)])
}
Add(Screen,8210909,567,273)
{
}
Add(Hub,3200720,532,322)
{
 link(onEvent1,6569629:doOperation,[])
 link(onEvent2,656069:doOperation,[(564,335)(564,342)])
}
Add(Math,6569629,567,322)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Width,[])
}
Add(Math,656069,581,336)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Height,[(587,312)(580,312)])
}
Add(Math,3321133,539,399)
{
 OpType=2
 link(Op1,7629770:Var1,[(545,383)])
 link(Op2,6635726:Position,[(552,387)(452,387)(452,441)(419,441)])
}
Add(Math,2603742,553,413)
{
 OpType=2
 link(Op1,1101479:Var1,[(559,376)])
 link(Op2,6814331:Position,[(566,401)(490,401)(490,450)(349,450)])
}
Add(GetDataEx,7629770,567,378)
{
 link(Data,6569629:Result,[])
}
Add(GetDataEx,1101479,581,371)
{
 link(Data,656069:Result,[])
}
Add(Hub,11170893,504,399)
{
 link(onEvent1,3321133:doOperation,[])
}
Add(Hub,9213231,266,322)
{
 OutCount=3
 link(onEvent1,3200720:doEvent1,[])
 link(onEvent2,16357142:doCapture,[(422,335)(422,349)])
 link(onEvent3,6814331:doFor,[(315,342)(315,405)])
}
Add(For,6635726,413,399)
{
 Start=1
 End=7
 link(onEvent,1698200:doEvent1,[])
}
Add(Hub,1698200,462,399)
{
 link(onEvent1,11170893:doEvent1,[])
 link(onEvent2,12379554:doCopy,[(500,412)(500,496)])
}
Add(Bitmap,15737688,679,343)
{
}
Add(For,6814331,343,399)
{
 Start=1
 End=7
 link(onEvent,10532982:doEvent1,[(380,405)(380,461)])
}
Add(Hub,10532982,385,455)
{
 link(onEvent1,2603742:doOperation,[(472,461)(472,419)])
 link(onEvent2,6635726:doFor,[(406,468)(406,405)])
}
Add(ListBox,15599374,714,490)
{
 Left=95
 Top=10
 Width=250
 Height=375
}
Add(Hashsum,1682770,644,490)
{
 @Hint=#7:Почему?|
 link(onResult,15599374:doAdd,[])
 AddHint(48,65,59,13,@Hint)
}
карма: 0

0
Ответов: 704
Рейтинг: 7
#10: 2011-12-07 01:49:35 ЛС | профиль | цитата
hitman249, а ведь и правда загадка. Не хочет никак из картинки получать данные. А при конвертировании картинка-данные вообще нет событий. Может картинки у md5 в игноре
карма: 0

0
Ответов: 3889
Рейтинг: 362
#11: 2011-12-07 02:41:32 ЛС | профиль | цитата
Neo писал(а):
а ведь и правда загадка

Ну, особой загадки загадки для посвящённых тут нет, хэш поддерживается ТОЛЬКО для данных типа stream, string, integer и real. Bitmap - отдельный, не поддерживаемый тип данных.
------------ Дoбавленo в 02.13:
hitman249, Индусский метод (схема автора топика с минимальными изменениями): 

Add(MainForm,9408146,175,63)
{
 Height=435
}
Add(ScreenShort,16357142,574,231)
{
 link(onCapture,15737688:doLoad,[])
}
Add(Button,10184002,133,210)
{
 Left=10
 Top=5
 Data=String(gfdhfdhgf)
 link(onClick,9213231:doEvent1,[])
}
Add(Img_Copy,12379554,511,378)
{
 Point(Width)
 Point(Height)
 Point(Result)
 link(onCopy,11653070:doEvent1,[])
 link(Source,15737688:Bitmap,[(517,367)(622,367)])
 link(X,3321133:Result,[(524,362)(482,362)])
 link(Y,2603742:Result,[(531,356)(496,356)])
 link(Width,7629770:Var3,[(538,271)])
 link(Height,1101479:Var3,[(545,264)])
}
Add(Screen,8210909,504,161)
{
}
Add(Hub,3200720,469,210)
{
 link(onEvent1,6569629:doOperation,[])
 link(onEvent2,656069:doOperation,[(501,223)(501,230)])
}
Add(Math,6569629,504,210)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Width,[])
}
Add(Math,656069,518,224)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Height,[(524,200)(517,200)])
}
Add(Math,3321133,476,287)
{
 OpType=2
 link(Op1,7629770:Var1,[(482,271)])
 link(Op2,6635726:Position,[(489,275)(389,275)(389,329)(356,329)])
}
Add(Math,2603742,490,301)
{
 OpType=2
 link(Op1,1101479:Var1,[(496,264)])
 link(Op2,6814331:Position,[(503,289)(427,289)(427,338)(286,338)])
}
Add(GetDataEx,7629770,504,266)
{
 link(Data,6569629:Result,[])
}
Add(GetDataEx,1101479,518,259)
{
 link(Data,656069:Result,[])
}
Add(Hub,11170893,441,287)
{
 link(onEvent1,3321133:doOperation,[])
}
Add(Hub,9213231,203,210)
{
 OutCount=3
 link(onEvent1,3200720:doEvent1,[])
 link(onEvent2,16357142:doCapture,[(359,223)(359,237)])
 link(onEvent3,6814331:doFor,[(252,230)(252,293)])
}
Add(For,6635726,350,287)
{
 Start=1
 End=7
 link(onEvent,1698200:doEvent1,[])
}
Add(Hub,1698200,399,287)
{
 link(onEvent1,11170893:doEvent1,[])
 link(onEvent2,12379554:doCopy,[(437,300)(437,384)])
}
Add(Bitmap,15737688,616,231)
{
}
Add(For,6814331,280,287)
{
 Start=1
 End=7
 link(onEvent,10532982:doEvent1,[(317,293)(317,349)])
}
Add(Hub,10532982,322,343)
{
 link(onEvent1,2603742:doOperation,[(409,349)(409,307)])
 link(onEvent2,6635726:doFor,[(343,356)(343,293)])
}
Add(ListBox,15599374,693,420)
{
 Left=95
 Top=10
 Width=250
 Height=375
}
Add(BitmapStream,8329442,644,371)
{
 link(Stream,13756969:Var2,[])
}
Add(MemoryStream,13187425,644,308)
{
}
Add(Hashsum,10008621,644,420)
{
 link(onResult,15599374:doAdd,[])
 link(Data,13756969:Var1,[(650,407)(689,407)(689,348)])
}
Add(Hub,11653070,567,378)
{
 OutCount=3
 link(onEvent1,8329442:doWrite,[])
 link(onEvent2,10008621:doHashsum,[(613,391)(613,426)])
 link(onEvent3,13187425:doClear,[(600,398)(600,449)(631,449)(631,321)])
}
Add(GetDataEx,13756969,644,343)
{
 link(Data,13187425:Stream,[])
}

[offtop]Хотя CRC и быстрее MD5, промежуточная конверсия в поток, а потом ещё и в HEX убила бы преимущество начисто потому оставил md5. Самое оптимальное решение тут будет, пардон за поминание всуе, хэширование напрямую участков экрана на IC. Самое быстрое - на ассемблеречистом C, на которых серьёзные кодеки и сервера терминалов, собственно, и пишут.[/offtop]
------------ Дoбавленo в 02.24:
Почему doClear? Вариант с doPosition медленнее и больше по размеру.
------------ Дoбавленo в 02.41:
Вариант автора топика + небольшое секретное кунг-фу: 

Add(Memory,5685907,546,371)
{
 Default=Integer(0)
}
Add(Button,10184002,168,266)
{
 Left=10
 Top=5
 Data=String(gfdhfdhgf)
 link(onClick,9213231:doEvent1,[])
}
Add(Img_Copy,12379554,546,434)
{
 DrawSource=1
 Point(Width)
 Point(Height)
 Point(Result)
 link(onCopy,11653070:doEvent1,[])
 link(Source,5685907:Value,[])
 link(X,3321133:Result,[(559,418)(517,418)])
 link(Y,2603742:Result,[(566,412)(531,412)])
 link(Width,7629770:Var3,[(573,327)])
 link(Height,1101479:Var3,[(580,320)])
}
Add(Screen,8210909,539,217)
{
}
Add(Hub,3200720,504,266)
{
 link(onEvent1,6569629:doOperation,[])
 link(onEvent2,656069:doOperation,[(536,279)(536,286)])
}
Add(Math,6569629,539,266)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Width,[])
}
Add(Math,656069,553,280)
{
 OpType=3
 Op2=8
 link(Op1,8210909:Height,[(559,256)(552,256)])
}
Add(Math,3321133,511,343)
{
 OpType=2
 link(Op1,7629770:Var1,[(517,327)])
 link(Op2,6635726:Position,[(524,331)(424,331)(424,385)(391,385)])
}
Add(GetDataEx,7629770,539,322)
{
 link(Data,6569629:Result,[])
}
Add(GetDataEx,1101479,553,315)
{
 link(Data,656069:Result,[])
}
Add(Hub,11170893,476,343)
{
 link(onEvent1,3321133:doOperation,[])
}
Add(Hub,9213231,238,266)
{
 OutCount=3
 link(onEvent1,3200720:doEvent1,[])
 link(onEvent3,6814331:doFor,[(287,286)(287,349)])
}
Add(For,6635726,385,343)
{
 Start=1
 End=7
 link(onEvent,1698200:doEvent1,[])
}
Add(Hub,1698200,434,343)
{
 link(onEvent1,11170893:doEvent1,[])
 link(onEvent2,12379554:doCopy,[(472,356)(472,440)])
}
Add(For,6814331,315,343)
{
 Start=1
 End=7
 link(onEvent,10532982:doEvent1,[(352,349)(352,405)])
}
Add(Hub,10532982,357,399)
{
 link(onEvent1,2603742:doOperation,[(444,405)(444,363)])
 link(onEvent2,6635726:doFor,[(378,412)(378,349)])
}
Add(ListBox,15599374,728,476)
{
 Left=95
 Top=10
 Width=250
 Height=375
}
Add(BitmapStream,8329442,679,427)
{
 link(Stream,13756969:Var2,[])
}
Add(MemoryStream,13187425,679,364)
{
}
Add(Hashsum,10008621,679,476)
{
 link(onResult,15599374:doAdd,[])
 link(Data,13756969:Var1,[(685,463)(724,463)(724,404)])
}
Add(Hub,11653070,602,434)
{
 OutCount=3
 link(onEvent1,8329442:doWrite,[])
 link(onEvent2,10008621:doHashsum,[(648,447)(648,482)])
 link(onEvent3,13187425:doClear,[(635,454)(635,505)(666,505)(666,377)])
}
Add(GetDataEx,13756969,679,399)
{
 link(Data,13187425:Stream,[])
}
Add(Math,2603742,525,357)
{
 OpType=2
 link(Op1,1101479:Var1,[(531,320)])
 link(Op2,6814331:Position,[(538,345)(462,345)(462,394)(321,394)])
}
карма: 1

1
Голосовали:Neo
Разработчик
Ответов: 26324
Рейтинг: 2147
#12: 2011-12-07 03:03:20 ЛС | профиль | цитата
[offtop]
1nd1g0 писал(а):
Вариант автора топика + небольшое секретное кунг-фу

Ахринеть, во намутили-то [/offtop]
карма: 22

0
Ответов: 3889
Рейтинг: 362
#13: 2011-12-07 03:31:04 ЛС | профиль | цитата
nesco, [offtop]Судя по популярности подобных тем, компонент работы с кодеками иили терминальным инструментарием разошёлся бы на "ура" [/offtop]
карма: 1

0
Ответов: 1528
Рейтинг: 57
#14: 2011-12-07 07:25:42 ЛС | профиль | цитата
[offtop]
1nd1g0 писал(а):
компонент работы с кодеками

ну коли тему подняли
screen-camture.zip[/offtop]
карма: 0

0
файлы: 1screen-camture.zip [55.5KB] [90]
Ответов: 704
Рейтинг: 7
#15: 2011-12-07 18:36:22 ЛС | профиль | цитата
1nd1g0, но как работает этот индусский метод? Почему вместо картинки идет 0, а оно все равно работает?

карма: 0

0
ФорумыПомощь по пакетупередача картинки (клиент-сервер) ← Ctrl12Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика