1樓：匿名使用者
procedure tform1.button1click(sender: tobject);
varf: textfile;
stmp: string;
num: integer;
begin
if fileexists('e:\abc123.txt') then
begin
assignfile(f, 'e:\abc123.txt');
reset(f);
while not eof(f) do
begin
readln(f, stmp);
num := strtointdef(stmp, -1);
if num <> -1 then
label1.caption := formatfloat('0.00', num/100);
end;
closefile(f);
end;
end;
2樓：
從txt檔案中讀取後付值給一個string變數，再把這個變數轉為integer型，那他前面的0就自動去除了，再除100不就ok了，沒裝delphi沒試過，不過應該可以
CASS如何讀取DAT格式
深圳市勵拓軟體 你檢查下，1 逗號是否是英文狀態下輸入2 是否和cass格式不符，比方最後多個逗號，或者少個高程。 cass中，讀取的dat格式的檔案在 繪圖處理 的 展野外測點點號 和 展野外測點 dat檔案就是cass預設開啟的格式，其中dad檔案要求的格式如下 1,zdh 450000.000...
硬碟無法讀取，顯示需要格式化磁碟
是串列埠盤吧，掛到別的機器上，在磁碟管理中找到重新格一下。可能原因 1.硬碟壞了 換新的吧 2.硬碟分割槽損壞 只能格式化或者找工具試著找加資料3.硬碟訊號線接觸不良 1 硬碟分割槽損壞，一般常見於老硬碟。邏輯損壞解決方法 用啟動盤啟動到dos模式 輸入命令fdisk mbr。2 如果修復不成功，還...
delphi隱藏執行程式,按某按鍵後調出來仍繼續執行
需要使用熱鍵方式來實現此功能，在熱鍵事件中新增顯示視窗的 以下為以為寫過的一個類似程式的關鍵 主視窗visible屬性設定為false則啟動時不顯示主視窗。private hotkeyid integer 熱鍵id procedure hotkey var msg tmessage message ...