Вопрос по Delphi

[FEOFAN]

Re: Помощь по Delphi

Я же говорю, модуль Registry подключил

Сорри, прогнал

 

[Live]

Re: Помощь по Delphi

Люди хелп! У кого есть компоненты для подключения автокада к делфи? Или же они есть на стандартных палитрах но я их не нашел
AutoCAD_TLB, comobj не пойдетъ. Заранее благодарен!

 

[FEOFAN]

Delphi. Drag'n'Drop

Есть форма с border:=bsNone
Как вы понимаете гарниц у нее нет, соответсвенно и таскать по экрану ее некак.
Подскажите пожалйста как написать эту байду самому.
Спасибо.

 

[lovesan]

Re: Delphi. Drag'n'Drop

procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
try
ReleaseCapture;
Perform (WM_SYSCOMMAND,SC_MOVE+2,0);
except
end;
end;


Вот, пожалуйста

 

[lovesan]

Re: Помощь по Delphi

Как можно отправить смс на любой украинский оператор с помощью делфи? Желательно пример. Заранее спасибо

 

[UnFeeLing]

Re: Помощь по Delphi

у кого есть прога для разработки exe приложений(install)поделитесь плиз

 

[KoLoB]

Re: Помощь по Delphi

Как можно отправить смс на любой украинский оператор с помощью делфи? Желательно пример. Заранее спасибо

А вы хоть понимаете как работают программы этого типа?
Вариант 1:
1. ставим свой смс-гейт, программируем его.
2. пересылка через почту
3. отправка через сайты

Чтобы реализовать первое, нужно потратить очень много зелёных, поэтому вариант отпадает.
Второй вариант чаще всего реализуют. Просто посылаем сообщение на специальный гейт оператора.
Третий вариант говорит сам про себя. Но доставку можно гарантировать только через сайт оператора, а у них везде надо вводить код...

 

[Merlіn]

Re: Помощь по Delphi

Задача: Есть StringGrid, необходимо определить тип хранящихся в ячейке
Cell [i,j] (тип String) данных, т.е.
- является ли текст числом (Integer,Extended),
- является ли текст датой (TDataTime),
- текст просто текст (String).

Реалитзовал просто - пытаясь преобразовать и перехватив исключение

try E:=StrToFloat(Grid.Cells[j,i]);C:=0;
except on EConvertError do   C:=1; end;
if C=0 then begin    Grid.Cells[j,i]:='Ext'; Continue; end;

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

 

[Edward the Gangsta]

Re: Delphi. Drag'n'Drop

я не люблю програмирровать. это скучно. а ваще Паскаль это не только язык, это еще и тело в др греции или гдето там.

 

[AkeL.php]

Re: Delphi. Drag'n'Drop

Точно в Греции?
Скучно - это писать на форуме всякий бред.