Вопрос по Delphi

Live

Happy Live :)
Re: Помощь по Delphi

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

FEOFAN

http://feofan.com
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

Member
Re: Помощь по Delphi

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

KoLoB

KoLoB.cz
Re: Помощь по Delphi

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

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

Merlіn

dead wizard
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;
выход не самый лучший, но писать своих грамоздких функций желания нет.
Жду конструктивных предложений, зарание спасибо.
 
Re: Delphi. Drag'n'Drop

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

AkeL.php

Guest
Re: Delphi. Drag'n'Drop

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