Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];

Вниз

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

 
F@T@L_Err0r ©   (2007-10-16 09:46) [0]

Здравствуйте уважаемые.У меня такой вопрос:как послать по COM порту типизированный файл,например картинку.Желательно с примером.Зараннее спасибо.


 
tesseract ©   (2007-10-16 10:15) [1]

Смотри CreateFile, ReadFile, WriteFile.


 
F@T@L_Err0r ©   (2007-10-16 10:41) [2]

Смотрел пробую выдает ошибку Aceess Voltation...


 
Skyle ©   (2007-10-16 10:43) [3]

Ошибка в 17-й строке.

Код покажите.


 
Dennis I. Komarov ©   (2007-10-16 10:46) [4]

> [3] Skyle ©   (16.10.07 10:43)

В логине :)


 
F@T@L_Err0r ©   (2007-10-16 10:56) [5]

function PostComm(var Buf; size: word): integer; //Передача в порт...
var i: integer;
    f: THandle;
    P1:POverlapped;
    Pic:TPicture;
begin
 pic:=form1.image1.picture;
 result := 0;
 while size >  0 do begin
   if not WriteFile(f,Pic, 1, i, p1) then exit;
   inc(result, i); dec(size);
   Application.ProcessMessages;
   end;
end;


 
tesseract ©   (2007-10-16 11:37) [6]

Мдям, а ты что хотел ? Картинку SaveToStream в память ии из стрима через буфер уже пиши.


 
homm ©   (2007-10-16 11:42) [7]

> [5] F@T@L_Err0r ©   (16.10.07 10:56)
> pic:=form1.image1.picture;
> WriteFile(f,Pic, 1, i, p1)

И что ты по твоему пытаешся записаать?


 
F@T@L_Err0r ©   (2007-10-16 11:43) [8]

homm ©   (16.10.07 11:42)
>И что ты по твоему пытаешся записаать?
Ну я не знаю как по другому...плиз подскажите как???Оч нада.


 
ЮЮ ©   (2007-10-16 11:46) [9]

> Мдям, а ты что хотел ? Картинку SaveToStream в память ии
> из стрима через буфер уже пиши.


А это важно, что писать ("картинку" или указатель на Картинку), при неинициализированных переременных "куда и как писать"?

наблюlать form1. в функции как то тоже ... Бр-р-р...


 
Германн ©   (2007-10-16 14:15) [10]


> типизированный файл,например картинку

Нет слов.


 
homm ©   (2007-10-16 14:18) [11]

> [10] Германн ©   (16.10.07 14:15)

Ага, я тоже это заметил :)


 
Dmitry S ©   (2007-10-16 14:55) [12]


> F@T@L_Err0r ©   (16.10.07 10:56) [5]

Грешно смеятся, но смешно...
Я, наверное, также выглядел, когда учился NTFS разрешения устанавливать.


 
Dmitry S ©   (2007-10-16 14:56) [13]

Еще смешнее, наверное, винде:)))


 
F@T@L_Err0r   (2007-10-16 15:19) [14]

Но все таки как же мне справится с задачей???Памагите плиз...


 
Сергей М. ©   (2007-10-16 15:30) [15]


> как же мне справится с задачей?


Воспользоваться для этой цели любым подходящим готовым компонентом  и не париться.

Для затравки
http://sourceforge.net/projects/tpapro/


 
GrayWolf   (2007-10-16 20:48) [16]

Абсолютно также, как же, как и нетипизированный



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

Форум: "Начинающим";
Текущий архив: 2007.11.11;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.045 c
6-1173167422
dron9205
2007-03-06 10:50
2007.11.11
Передача информации через com-порт


4-1178388982
buben
2007-05-05 22:16
2007.11.11
Application.Handle


2-1192553883
hi
2007-10-16 20:58
2007.11.11
Сервис - > Свойства папки..


15-1192012733
Tifon
2007-10-10 14:38
2007.11.11
Подскажите литературу


8-1169034939
Vovan #2
2007-01-17 14:55
2007.11.11
Работа со звуком в Delphi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский