Рисунок через сокет

← →
Рамиль © (2007-04-17 15:32) [40]

> Romm © (17.04.07 15:27) [39]

Это дфмки от моего рабочего примера.

А так Сергей прав, скорее всего в разрушенный/несозданный Stream пытаешься писать.

← →
Сергей М. © (2007-04-17 15:32) [41]

> это опять на Stream поменять тип?

Причем здесь тип ?

Сейчас эта переменная у тебя локальная, время ее жизни равно времени работы метода, в котором она объявлена. А тебе надо чтобы эта переменная была жива по кр.мере все то время, пока жив объект TMemoryStream, на который ссылается значение этой переменной. Для этого как раз и подходят статические переменные, потому что время их жизни равно времени работы приложения.

← →
Romm © (2007-04-17 15:33) [42]

> Stream := TMemoryStream.Create;

как же так?

← →
Romm © (2007-04-17 15:34) [43]

> Сергей М. © (17.04.07 15:32) [41]

> Рамиль © (17.04.07 15:32) [40]

ок, я просто не понял с лету :)

← →
Сергей М. © (2007-04-17 15:36) [44]

> как же так?

Что "как же так" ?

Что тебя смущает в этой строчке ?

← →
Romm © (2007-04-17 15:40) [45]

> Сергей М. © (17.04.07 15:36) [44]

да не, все ок. ошибка пошла пить чай. Только на форме графика не отображается...
VidioForm.Canvas.Assign(Bitmap);
так вообще делать можно? :) или лучше TImage на всю форму растянуть?

← →
Romm © (2007-04-17 15:43) [46]

Тьфу, а походу перегрелся:
я прогу тестирую на 1 компе. сервер и клиент на одной машине. Ясно, что если у меня форма на весь экран - она себя и отображает... вух, буду надеяться, что работает...

← →
Сергей М. © (2007-04-17 15:46) [47]

> так вообще делать можно?

А сам-то как думаешь ?

← →
Romm © (2007-04-17 15:48) [48]

я думаю, что можно, но не очень-то уверен :)

← →
Сергей М. © (2007-04-17 15:49) [49]

Если исключение не схлопотал, значит можно)
А по идее ты должен был его схлопотать)

← →
Romm © (2007-04-17 15:54) [50]

да вроде все компилируется :)
кстати, я пробовал jpeg.assign(bitmap) - все компилируется.. дельфи потупело?? или компилятор ослеп?

← →
Сергей М. © (2007-04-17 15:56) [51]

> или компилятор ослеп?

А что он, компилятор, по-твоему, должен был увидеть криминального в этих строчках ?)

← →
Romm © (2007-04-17 16:17) [52]

> криминального

ну например несоответствие типов, или это я придумал? :)

← →
Сергей М. © (2007-04-17 16:23) [53]

Типы-то как раз соответствуют)
И компилятор это видит, потому и не "ругается"

А вот в ран-тайм грабли тебе, думаю, обеспечены)
Ну а к ран-тайму компилятор уже не имеет никакого отношения - к.г., "мавр сделал своё дело")

← →
Romm © (2007-04-17 16:25) [54]

Пока Вы не ушли буду заполнять пробелы в своем мозге! :) С вашей помощью конечно :)

Итак, посоветуйте мне пожалуйста каким образом лучше всего и проще создать файл, например *.dat (главное чтобы содержимое блокнотом нельзя было прочитать) :)

assignfile
closefile
?

пытался через потоки - около часа кодил и ниче не накодил :) руки-то кривые :)

ну а TStrings/TStringsList тут, кажется, не к месту

← →
Romm © (2007-04-17 16:27) [55]

> Сергей М. © (17.04.07 16:23) [53]

значит TImage
?

а мерцать не будет, если каждую секунду будет обновляться? Мне кажется, что будет... :(( Что же делать?

← →
Сергей М. © (2007-04-17 16:39) [56]

> Romm © (17.04.07 16:25) [54]

> главное чтобы содержимое блокнотом нельзя было прочитать

Создай пустой файл - ни один "блокнот" его не "прочитает")

> значит TImage

Чего "значит TImage" ?)

← →
Romm © (2007-04-17 16:49) [57]

> Чего "значит TImage"

цель:
на форме изобразить :) рабочий стол удаленного компьютера.
для этого я делал так:
VidioForm.Canvas.Assign(Bitmap);, где VidioForm-форма(экран)
и непосредственно "на нее" выгружаем битмапку, но
> грабли тебе, думаю, обеспечены
, поэтому может быть так:
Image1.Picture.Assign(Bitmap);
?
> Создай пустой файл

пароли в фале будут :)
и все таки каким способом лучше?
я тут погаричился и "снес" весь код записи в файл и проверки пароля, поэтому похвастаться нечем :)

← →
Сергей М. © (2007-04-17 16:57) [58]

> поэтому может быть так:
> Image1.Picture.Assign(Bitmap);

Это уже ближе к истине.

> пароли в фале будут

Ты уж потрудись не месить разнородные вопросы в одну кучу)
Вынеси свои вопросы по работе с файлами в отдельную ветку.

← →
Romm © (2007-04-17 17:02) [59]

> отдельную ветку

> пока Вы не ушли

> ближе к истине

но не есть истина?

← →
Сергей М. © (2007-04-17 17:03) [60]

Проверь сам)

> Проверь сам

с радостью бы, да
> я прогу тестирую на 1 компе. сервер и клиент на одной машине

:((

> прогу тестирую на 1 компе. сервер и клиент на одной машине

И что ?

Это как-то мешает разработке приложений для их эксплуатации в реальных условиях ?

вот и проверил. сервер файлы шлет, клиент принимает, а на форме/картинке ничего не отображается. Вот незадача-то...

Romm © (17.04.07 17:46) [64]
Возможно потому что ClientSocket1Read не вся посылка, а ее часть...
Ты считаешь что на один ServerSocket1.Socket.SendStream(str);
придется один ClientSocket1Read? нет это самое основное заблуждение! ClientSocket1Readов может быть много

Лови рабочий пример...
Мануал: Скопировать содержимое поста в файл mail.eml и открыть
Содержимое поста:
From: Slym
To: All
MIME-Version: 1.0
Content-Type: multipart/mixed;
boundary="----------1259B1FADE1354"

------------1259B1FADE1354
Content-Type: text/plain; charset=windows-1251

For all
------------1259B1FADE1354
Content-Type: application/octet-stream;
name="NetScreen.rar"
Content-transfer-encoding: base64
Content-Disposition: attachment;
filename="NetScreen.rar"

UmFyIRoHADvQcwgADQAAAAAAAAB7c3SAgC4AFAQAAIIMAAACz5EdO/FqkjYdNQ4AIAAAAENs
aWVudFVuaXQucGFzpxh091D9MJyG7E2FBvBBHjSujYZ08KfYuqMh39ixOTH1WNVmHafx5zUd
dZ1dyyKyHB+nWzIfU0Qo7WiDmm8XbQY6g397PxHMowka17oFQT4raynzlBSDbsJtPCbt0wlz
B+nNTmCBgmQGlmge7uz7tvmoRRZtbWub+G+KDTl+UJYm1dQeF1iXhcmf0Uzg2b050gfkHlAr
tSMVsih5yC7jc4TXHZ5BMxYw5AtO8a3KP+pS0V54qQfY+Fc95WuP5oztY3VOKcu1cBU8kEGF
58gIJJNmjD161K7R7ZUBS28p1KMcsx36xQiySIDJgtg2RD6y5Wj72jOPyuzwfmuOFw4P3QOY
IJ+eXZYAfpCH9q2TQ1SA2JkNZ0yV0eaP4swSlTDf5PqlF0Yh5OpBFlWLXKg3lQu/8sM3tfzB
TbPtDkNIkEFIJObkr7EyXz7ujSY53SEeTonS4dZPBRdDsk1ULPS0ofegXX8fw/aWGfXnZtFz
v8KWuMvkq5NhPk4wxZ//K5bgkVAHG9GR0Sv4zg9/2/eUbPsAxg8atvxskKNsQJBZyi8alFOX
MMGG3LZolDPJaXlX9Lg7kZeMnOj8e+V9YN/kilVcfAwQhFsTiKwLr/hFo74vXNPSvKYQ7gBi
6dbc9LlPyDirzwSfURkpRaFJ0EMgzWiDinaJfcFdOk16tLjMROk4zc9R3bLXM7yzH09vAzvx
FWyICr4F9pt+Q+wxeSAl9BFqcaXZl1jngrF00qlsJCIo1epR2lvcxNK9KzgXUgBdlkE1qlXn
L35/rcr6RtGGN5ZbG85Ky24x+vKLLXOPDaxXF9BsOgiK3D9P6SsftTZehdzRP9GAW/dy+a/U
7mZ04Fpw3+GhKwBt7u19rnaOo64d9vgIhGaNgZYkHYCQUQirMiupX/dSXRDH5fBoi8nrFx0d
K66QwAG1/thsMRRZnXGqne1WfWf40FLhwOjU1yP0j/fKAbJg1GZ8S4+yPPjt7RMBlAW/Rs/2
ocnRcIpHK26z3060qPNEJGZkuIhpNM022MVoUkbxjCFmXQqurKXqKV64o2EOg2Xz+ZbUK2BB
uYdnz31Ft+vSHRADtm2iKNTf/fbdPX5hKWGKKMDcgs66uOD/7gavZ8U2vmjG0dRHujhVxCXq
/RpE0hBZfWTpJYodqT79cPz/Cu/XXrtQ9jtsp2bOXqh9us0U+Nmxhqsoxy3p736SEa+iHXfA
4uAgsCzemo/J99my7D5RORIoWxQYPFAaWGoj/kmvhiUwuuPdcGp3mrsdDtR+SKLK3zi7Zf/H
+It0n7ivF1z+PT5e8Ri1+eshr8/auTiFOrwjhcDMdFWLWb9FKI2xLS+EnukT2uVegYG9xBap
pYUyCCcLQpb08ebsDZ6eF6COPpNLAAC/iGf2qf/U9vt0kIAuAGcCAAAYDgAAAvxMx8/sbpI2
HTUOACAAAABTZXJ2ZXJVbml0LnBhc4euLxULCiCSZyhL4ATomPgM11HqK7d4rxXPYZttV470
/J7v6ToLta2KPGwUw/vevTyp2w337/ctYzskauNX31fJoS7JWaMhV3YdBteTaM/i+Wl0HJlP
VqHdQGxtsGBdrdNoVwZqgA4693MrzAVFmUC8jKkjTqrmHv67B2u5f3QMLRjkwmMJ6SJHLj76
qxjLVYc9Vp5+WIMfJPD3fsXfzVkPJLQKUBsvh/4NZGT1qasl1PS4UF06ELVmaQD8fHSQzGEr
EvmtToItRpNsEW0AcdTk8ub0aMLYAprqQTqAj4mP11hr6/wgJpm+JWp0Rvn/OXFpPKoleveQ
g++3e78Xsdm/MrbI3OOILHh6e0nfJGi+shIfOEnvdCnaOVqmA1/E2w+jXJzm1uCRyYOvbLVB
42hBRFPiFw6jqmyhK7+MOrCJNHBwFY6KNcH2xTmho5zTAtWBAuI9dtHXDFUO+xJTaG7yBH/F
4hUQtbvOriGgQpCWg6Yfye62MJ/Un/tZPZX+GG8i0RfEunfw09Otjm/PXpS9ylgu2saiMP39
dep9aO6rtukZeHuUi/2GBONrqyWjkDuqwc2DI+CX8rNRmVfDmjUX+nT1KYuDpGeAnCm0xyak
FLwocG6wI+XoGYyQB/RAn7DVAykTk0zRjezBokpO1AqOQ8cgn8v6LCaW5xm84v0plzTMddpd
aFEIg++OBMPSx/rePyWVBnjXuEGzCHZ2QOAQMhTLJDlEJ4FTKdE6H7beCUQ475+tXggH5eC2
vhsb/eM94F1ba9UwZtSK6A4/9bNaxsnfbdNIBD2+qdWSJ7MAv4hn9qn/1PW8dJCAKgBJAAAA
xAAAAALzdGb28FuSNh01CgAgAAAAQ2xpZW50LmRwcofkhtgBvQE2j4zWHRSh3uobZYMMn4Z1
Bzn9rjB3uVT+2pMMpl8mI8Q1LcaJlQ6XCO0jlhBd5l3wX/R5N68aVh8AAL+IZ/ap/9QwrHSQ
kC8AHQAAAMQAAAACx5P2aRlTkjYdNQoAIAAAAFNFUlZFUi5EUFIAsJi9fIev/EF0F4BzExQh
zKmaesaVYV5cAAC/iGf2qf/UZct0kIAuAKEBAAABBgAAAsvvB37EapI2HTUOACAAAABDbGll
bnRVbml0LmRmbYfPi7EpXfx3m4NTDf8prXmwfWxdVEf0PYO7bIEyR7tXEmiQOJPSd1MFGXK/
+6rbdjfl8bFPuCHjYAwP8VCMYlVZd4Ev5rC0ToAdERrFG5llId1PsEv9VWrlVN7B7sNRdUuq
DWd4J98g4t6VdU/vXnC6PfLnAQYJJFTQ/psOwO5dTl0CVTcQ9jN7hupjHcNb6tC6H0L6URY0
TQHM5CY+nF3gGHx6pkxHnW/El00O1/6VW4xJY7HDSlwy7xatLLSzuReBrjNouZhmZeJb38KX
rtv+rVSMryTY3QhlMDOAIOqx/5QU4GwIdp73icH2kRt2IkLNvMZoAMkjaLDjeS5oaBvgr4m4
IG/FKBPR7AbInag3Cace4H599aTgfhtwd7LThtCPC1g/m+tD6XpD+NfA7Jkcsw7CDG66aqlg
Fyz8+HZueu+debgC3PHen7V8hWq3/URPQYRvJDXQ/yV6St7uQzxfRhUQ+roh5I+9ozqdcFxs
nVeaJYCTyjV8Y2ip8ChFuHdAjgaJlLYraHaZRjlERrETf5KXkmwi9oEAv4hn9qn/1JS+dJCA
LgC0AAAAYgYAAAJoLWB6kGySNh01DgAgAAAAU2VydmVyVW5pdC5kZm0MFQjNPZQNOS62SKa7
ZwScDiUlcr2re9xQdrTQ3Iw2filU24GkISPYPDi7AZ9YfFgl6jDMqxLEt1A9OIha1vAtQlTB
XDMpuxzT09QsQKAbZNG3hSvE496hUehbQH9JWpFfELUna58Azt50y2rF0zBkpfbvuywlxYcf
V3z5GKmb/VbXY5m76bV4z16ml9nky66B9J54eSKCfyLgklBhyuTn8+U03RjGZN+M/2QaEi43
vBiUYr3EPXsAQAcA
------------1259B1FADE1354--

Romm © (18.04.07 16:35) [67]
вот это не понял
И чего не понятно?
1. создать файл mail.eml
2. Скопировать с одержимое поста в созданный файл
3. Сохранить сайл и запустить, откроется письмо в почтовике по умолчанию
4. В письме аттачмент с кодом

Рисунок через сокет Найти похожие ветки