請問各位大大 我現在資料庫中有四個欄位分別是 平時加班 超時加班 週六加班 假日加班 4 0 0 0 (這是一個人對多筆的加班資料) 計算規則如下 加班費計算 1. 平日加班 平日超時加班 週六加班 假日加班(<=8小時) < = 46 小時 ---- 屬加班費 2. (平日加班 平日超時加班 週六加班 假日加班(<=8小時)) - 46 > 0 小時 ---- 屬工作奬金 (即加班時數超過46小時的部份) 3. 假日加班超過8小時的部份 ---- 屬工作奬金 PS:第一跟第三我都算的出來,就是第二點沒辦法算出超過46小時的時間(未超過 46小時是加班費,超過46小時的小時數才轉成工作獎金). 發表人 - cd109 於 2004/08/27 11:31:15

您好﹗    試試如下﹕

Var
  Total_Hours, Over_T, Bonus_T : Integer;
  //Over_T為加班費﹐Bonus_T為工作獎金﹐Total_Hours為加班時間合計
begin
  Total_Hours := ADOQuery1.FieldByName('平時加班').AsInteger   ADOQuery1.FieldByName('超時加班').AsInteger   ADOQuery1.FieldByName('周六加班').AsInteger   ADOQuery1.FieldByName('假日加班');
//以下為您的第一項要求
  if Total_Hours <= 46 then
    begin
      if ADOQuery1.FieldByName('假日加班').AsInteger <= 8 then
        begin
          Over_T := Total_Hours;
          Bonus_T := 0;
        end
      else
//以下為您的第一項加第三項要求
        begin
          Over_T := Total_Hours - ADOQuery1.FieldByName('假日加班').AsInteger   8;
          Bonus_T := ADOQuery1.FieldByName('假日加班') - 8;
        end;
    end
  else
//以下為您的第二項要求
    begin
      if ADOQuery1.FieldByName('假日加班').AsInteger <= 8 then
        begin
          Over_T := 46;
          Bonus_T := Total_Hours - 46;
        end
      else
//以下為您的第二項加第三項要求
        begin
          if (Total_Hours - ADOQuery1.FieldByName('假日加班').AsInteger   8) <= 46 then
            begin
              Over_T := Total_Hours - ADOQuery1.FieldByName('假日加班').AsInteger   8;
              Bonus_T := ADOQuery1.FieldByName('假日加班').AsInteger - 8;
            end
          else
            begin
              Over.T := 46;
              Bonus_T := Total_Hours - 46;
            end;
        end;
    end;
end;

========================= 大病初愈﹐休養調整中... ========================= 發表人 - cashxin2002 於 2004/08/27 18:15:27

------
忻晟

謝謝大大回覆 問題已經解決了,雖然程式碼不太相同,不過原則還是相同的.