procedure tform2.adotable1beforepost(dataset: tdataset);
begin
adotable1.cancel;//如果只用這一句，要成功post
abort;///如果只用這一句，操作會一直停留在這一行，不能換行
end;
var dotpos,len,fspos:integer;
begin
result:=key;
if not (key in ['-','0'..'9','.',#13,#8,#27]) then result:=#0
else
begin
dotpos:=pos('.',je);
fspos:=pos('-',je);
len:=length(je);
if key in ['.','-'] then ///輸入小數點的情況
begin
if ((key='.') and (dotpos>0)) or ((fspos>0) and (key='-')) then //不能多於兩個小數點 或負號
begin
result:=#0;
exit;
end;
if ((len<=0) and (key='.')) or ((key='-') and (selstart<>0)) then //開始不能輸入小數點，負號只能在開始輸
begin
result:=#0;
exit;
end;
if (key='.') and (selstart0) and(dotpos<=len-2) and (selstart>=dotpos) then result:=#0;
if key=#13 then result:=#13;
if key=#27 then result:=#27;
end;
end;
3、delphi程式裡出現cannot create拒絕訪問的錯誤時，這個使用者對此盤沒有寫的許可權導致。解決方法：在屬性裡對everyone的寫許可權放開
cat重點知識
cat option file b 對空行不編號 n 對所有的進行編號 s 去掉重複的空行，只保留一行 e 在每行結尾顯示乙個 t 把文件中的tab鍵 顯示 行 i v 沒用。只正常顯示ascii以內的字元，其他字元進行編碼 m h b,number nonblank number nonempty...
重點知識 jQuery
查詢dom元素節點物件，並將dom元素節點物件封裝為乙個jquery物件 將dom元素節點物件封裝為jquery物件 直接將html結構封裝為乙個jquery物件 選擇器 css 樣式名 屬性值 選擇器 css 選擇器 css 樣式名 單個類樣式 selector addclass class 多個...
知識散點（一）
同源策略 同源策略是web的基礎，當瀏覽器在載入頁面指令碼時，會對當前的指令碼進行判斷，如果不進行特殊允許，則不可以載入此頁面的指令碼。這個策略有效防止了很多的攻擊。打個比方，a.com中載入了b.com的指令碼，這種情況是不允許的，除非得到了同意，在這裡對同源策略下乙個定義。瀏覽器的同源策略，限制...