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

Вниз

Текстовое поле для ввода айпишника???   Найти похожие ветки 

 
Valeris   (2003-08-19 16:23) [0]

Как сделать сабж?

Спасибо


 
Vlad   (2003-08-19 16:29) [1]

TMaskEdit.EditMask см. Help там подробно все описано.


 
wl   (2003-08-19 16:37) [2]

А вот интересно, в Визуал С++ есть такой компонент, так вот он через МаскЭдит сделан, или это отдельный такой компонент?


 
clickmaker   (2003-08-19 16:42) [3]

В Визуал С++ (в MFC) он сделан на основе стандартного виндозного IP Control"а из comctl32.dll
В принципе, можно и в Дельфе на его основе написать компонентик. Унаследовать от TEdit, только CreateParams переопределить для создания нужного окна


 
Крот   (2003-08-19 17:38) [4]


> clickmaker © (19.08.03 16:42) [3]


А почему не от TWinControl?


 
Юрий Федоров   (2003-08-19 17:45) [5]

>>Крот © (19.08.03 17:38) [4]
наверно чтобы св-во text сразу было


 
Mr&MsGuns REAL   (2003-08-20 00:18) [6]

Наверное...


 
Marser   (2003-08-20 01:50) [7]


> clickmaker ©

Скорее от TCustomEdit...

> Юрий Федоров © (19.08.03 17:45) [5]

:-)


 
Голова   (2003-08-20 07:51) [8]

В наборе JEDI есть такой компанент


 
Ученик   (2003-08-20 07:55) [9]

unit IPAddr;

interface

uses
Classes, Controls;

type
TIPAddress = class(TWinControl)
private

protected
procedure CreateParams(var Params: TCreateParams); override;
public
constructor Create(AOwner: TComponent); override;
published
property Anchors;
property BiDiMode;
property Constraints;
property Enabled;
property Font;
property Hint;
property ParentBiDiMode;
property ParentShowHint;
property PopupMenu;
property ShowHint;
property TabOrder;
property TabStop;
property Text;
property Visible;
property OnContextPopup;
property OnEnter;
property OnExit;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
end;

implementation

uses
ComCtrls, CommCtrl;

{ TIPAddress }

constructor TIPAddress.Create(AOwner: TComponent);
begin
inherited Create(AOwner);
Width := 100;
Height := 20;
TabStop := True;
end;

procedure TIPAddress.CreateParams(var Params: TCreateParams);
begin
InitCommonControl(ICC_INTERNET_CLASSES);
inherited CreateParams(Params);
CreateSubClass(Params, WC_IPADDRESS);
end;

end.



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

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

Наверх





Память: 0.46 MB
Время: 0.009 c
3-10569
M126
2003-08-15 13:04
2003.09.04
Ошибка Query


3-10608
Vadim_aka
2003-08-13 16:23
2003.09.04
Как парсировать ТХТ файл в БД InterBase.


3-10649
SPIRIT
2003-08-12 14:19
2003.09.04
Запросик


1-10818
AkaSaint
2003-08-21 11:59
2003.09.04
if и порядок выполнения условий, разделенных or


4-11035
i-s-v
2003-06-23 11:44
2003.09.04
Можно ли програмно создать DLL?





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