TMaskEdit.EditMask     !999999;1;_
TMaskEdit.EditMask !999999;0;_
0 和 1的值 這樣設定有蛇麼差別呢?

------
Delphi 6
postgresql 8.1.4

問前先搜一下吧!
Delphi 新手問題 / 作業研討 » TMaskEdit.EditMask日期格式問題
http://delphi.ktop.com.tw/board.php?cid=30&fid=1498&tid=94419

------
努力會更接近成功

我就是因為看不懂 所以才又再問一次
因為實際測試後還是不了 所以 XD 才問

------
Delphi 6
postgresql 8.1.4

1 = 會存入格式跟資料
0 = 只會存輸入的資料

舉個例子吧
!\(999\)000-0000;1;_
(007)666-1234

1 = (007)666-1234
0 = 0076661234

對了，你的問題的例子，答案是沒有差別!

Sample :

Unit1.pas

[code delphi]
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Mask;
type
TForm1 = class(TForm)
MaskEdit1: TMaskEdit;
Label1: TLabel;
Label2: TLabel;
MaskEdit2: TMaskEdit;
Button1: TButton;
Edit1: TEdit;
Edit2: TEdit;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
edit1.Text := MaskEdit1.text;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
edit2.Text := MaskEdit2.text;
end;
end.

[/code]

Unit1.dfm

[code delphi]
object Form1: TForm1
Left = 192
Top = 114
Width = 696
Height = 480
Caption = 'Form1'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 80
Top = 104
Width = 6
Height = 13
Caption = '0'
end
object Label2: TLabel
Left = 80
Top = 192
Width = 6
Height = 13
Caption = '1'
end
object MaskEdit1: TMaskEdit
Left = 168
Top = 104
Width = 215
Height = 21
EditMask = '!\(999\)000-0000;0;_'
MaxLength = 13
TabOrder = 0
end
object MaskEdit2: TMaskEdit
Left = 168
Top = 184
Width = 215
Height = 21
EditMask = '!\(999\)000-0000;1;_'
MaxLength = 13
TabOrder = 1
Text = '( ) - '
end
object Button1: TButton
Left = 416
Top = 104
Width = 49
Height = 25
Caption = 'Button1'
TabOrder = 2
OnClick = Button1Click
end
object Edit1: TEdit
Left = 488
Top = 104
Width = 129
Height = 21
TabOrder = 3
Text = 'Edit1'
end
object Edit2: TEdit
Left = 488
Top = 184
Width = 145
Height = 21
TabOrder = 4
Text = 'Edit2'
end
object Button2: TButton
Left = 416
Top = 184
Width = 57
Height = 25
Caption = 'Button2'
TabOrder = 5
OnClick = Button2Click
end
end
[/code]

------
努力會更接近成功

編輯記錄

感謝你喔 我就是因為自己測試過 發現結果一樣 才問的 呵 原來是必須有一定的格式 才會不一樣 
害我那悶了很久 XD 感恩耶

------
Delphi 6
postgresql 8.1.4