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

Вниз

Опять о программистах   Найти похожие ветки 

 
Германн ©   (2009-03-02 02:23) [0]

Не ну как можно писАть такой код:
function TDriver.devOpen(SID: Integer; const Name,
 Params: WideString): WordBool;
Var
  strMsgError: String;
  Ret: OleVariant;
  I: Integer;

begin
 Setting.SID:=SID;
 Setting.devName:=Name;
 Setting.devParams:=Params;
 TryStrToInt(Name,I);
 Setting.cmdAddr:=IntToHex(I,2);
 Setting.cmdPolling:="038265";
 ThreadPolling.Resume;
 SendEvent(eventDeviceOpen);
end;

А на хрена тут функция, если нет никакого результата?


 
Kostafey ©   (2009-03-02 03:02) [1]

Может предполагалось, что потом ее допилят?


 
Германн ©   (2009-03-02 03:16) [2]


> Kostafey ©   (02.03.09 03:02) [1]
>
> Может предполагалось, что потом ее допилят?
>

Ага. И меня тут сочтут "последним"!
Нафиг, нафиг! Кричали юные пионеры ...


 
brother ©   (2009-03-02 07:41) [3]

дополни result:=true; или перепиши proceudre :)
зы откуда код?


 
test ©   (2009-03-02 07:50) [4]

Может там где нибудь ниже вилы? Поставили AX явно и не паряться.


 
KSergey ©   (2009-03-02 08:06) [5]

> Германн ©   (02.03.09 02:23)  
> А на хрена тут функция, если нет никакого результата?

По сравнению с - фигня полная, даже не стоило обращать внимание, лишь отреагировать на ворнинг компилятора если бы - да и все.


 
Anatoly Podgoretsky ©   (2009-03-02 09:42) [6]

> Германн  (02.03.2009 2:23:00)  [0]

Ну тут много чего нет, Ret, strMsgError, Result

Программа должна была вывалить кучу непонятных ошибок, что то по английски проблеять.


 
Anatoly Podgoretsky ©   (2009-03-02 09:43) [7]

> brother  (02.03.2009 7:41:03)  [3]

Из Интеренет вестимо.


 
clickmaker ©   (2009-03-02 11:45) [8]

> TDriver

а еще говорят, что на дельфи драйвера не пишут...


 
brother ©   (2009-03-02 11:49) [9]

> Из Интеренет вестимо.

ну, там можно все)))))))))


 
Германн ©   (2009-03-02 14:24) [10]

Автор кода сегодня в телефонном разговоре сказал, что "наверно у меня старая версия, а в новой всё есть"!
Но он мне сам на комп скопировал сей код со своего ноутбука неделю назад.


> clickmaker ©   (02.03.09 11:45) [8]

Во вишь какие наши программисты крутые!
:)


 
antonn ©   (2009-03-02 14:42) [11]


> А на хрена тут функция, если нет никакого результата?

результат есть всегда, другое дело что он не возвращается явно :)
eax где нибудь, как в [4]



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

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

Наверх





Память: 0.46 MB
Время: 0.006 c
2-1237472358
Alex_C
2009-03-19 17:19
2009.05.03
Размер страницы принтера....


15-1235820460
iZEN
2009-02-28 14:27
2009.05.03
Диалог стандартного TWAIN-драйвера сканера


2-1237207156
madmech
2009-03-16 15:39
2009.05.03
Как рисовать на канве BitBtn?


15-1236073702
Юрий
2009-03-03 12:48
2009.05.03
С днем рождения ! 29 февраля 2009


2-1235098931
kjhgfdjk
2009-02-20 06:02
2009.05.03
Коды клавиш





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский