分類: 生活雜感

聖誕節快樂

因為有facebook的關係，所以很少分享生活中的點滴。不過就破例一下 🙂

昨天跟太平洋百貨豐原店企劃課林幽蘭課長合照，出現了美女與野獸(野生壽山)的照片~最後換了一套結合萬聖節及聖誕節的「生膽老公公」造型裝扮～
結果有不少人來合照，還有媽媽叫小朋友過去合照，小朋友不敢還被媽媽笑沒膽XD
來！靠近我就生膽給你了XD

anyway~還是祝大家聖誕節快樂！Merry Xmas~

 

1459094_984337424913273_6452567582794794122_n1800356_10152429949666541_4533522340688898873_n

機器上除了要擺乖乖外，程式碼也該加上

[pascal]
//
// _oo0oo_
// o8888888o
// 88" . "88
// (| -_- |)
// 0\ = /0
// ___/`—‘\___
// .’ \\| |// ‘.
// / \\||| : |||// \
// / _||||| -:- |||||- \
// | | \\\ – /// | |
// | \_| ”\—/” |_/ |
// \ .-\__ ‘-‘ ___/-. /
// ___’. .’ /–.–\ `. .’___
// ."" ‘< `.___\_<|>_/___.’ >’ "".
// | | : `- \`.;`\ _ /`;.`/ – ` : | |
// \ \ `_. \_ __\ /__ _/ .-` / /
// =====`-.____`.___ \_____/___.-`___.-‘=====
// `=—=’
//
//
// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
//
// 佛祖保佑 永無bug
//
//***************************************************
[/pascal]

Delphi 電子發票開發

業務上的需求要開發電子發票的模組，前同事給了Delphi 6的範例程式，經過了一番修改後，終於在 Delphi XE3能正確使用了。
6337-1

主要的問題如下：

1) Char改 AnsiChar

2) PChar改 PAnsiChar

3) String 改 AnsiString

4) XE3 Length取長度時，也需要先以AnsiString才會正確。
主要加密元件宣告

[pascal]
procedure QRCodeINV(a_InvoiceNumber: AnsiString;
a_InvoiceDate: AnsiString;
a_InvoiceTime: AnsiString;
a_RandomNumber: AnsiString;
af_SalesAmount: Double;
af_TaxAmount: Double;
af_TotalAmount: Double;
a_BuyerIdentifier: AnsiString;
a_RepresentIdentifier: AnsiString;
a_SellerIdentifier: AnsiString;
a_BusinessIdenti: AnsiString;
a_AESKey: AnsiString;
a_output: pAnsiChar;
var ai_errorCode : Integer) STDCALL; external ‘QRDLL.DLL’;

[/pascal]

附上電子發票開發需要文件：

二代電子發票加解密API文件下載

打手機前請先填寫資料XD

因為前陣子在測試關閉iCloud同步備份，還有誤刪了手機通訊錄，所以要請朋友們如何要跟壽山手機聯繫的話。請先填下面的頁面，壽山輸入手機後才有可能接通，實在是好多無關緊要的電話流入。對想專注開發的壽山是一大阻礙!謝謝