分類: 程式設計

XAMPP與Laravel5

1. PHP.ini中的extension=php_openssl.dll 前面的;要移除，重開apache
2..htaccess, index.php, favicon.ico從public移至上一層
3.index.php
require __DIR__.’/../bootstrap/autoload.php’;
改
require __DIR__.’/bootstrap/autoload.php’;

$app = require_once __DIR__.’/../bootstrap/app.php’;
改
$app = require_once __DIR__.’/bootstrap/app.php’;

能取代parse服務的台灣MBaas平台-Lightspeed

Facebook收購國外著名的MBaaS(行動雲端平台)服務 Parse後，前幾天無預警的宣布一年後將關閉服務。也讓大家開始尋找新的MBaaS（行動雲端平台）服務，希望能為企業App加入推播、即時通訊、社交功能，來加速開發流程。
尋找解決方案中，看到台灣在2014年就有赫迅這家公司，提供了Lightspeed這個服務。包辦複雜的後端架構，而且提供推播、即時通訊以及社群互動功能加入app。
lightspeed01
目前該服務已經服務的客戶有許多知名的公司及媒體如Sony、遠傳電信、蘋果日報、蘋果動新聞、壹週刊網、窮游、海底撈火鍋、ump聯動優勢、csdn、中國銀聯。
lightspeed02
目前的申請方式需先至服務的申請頁面，然後填寫表單後核准。
lightspeed03
核准後會收到一封裡面有beta code的邀請函，然後註冊後就可以試用。
lightspeed04

lightspeed05

lightspeed06

相關聯結:
Lightspeed官方網站
sdk說明文件
試用申請
Lightspeed Admin Console
主控台

Delphi讀取utf8格式ini及取得動態內容

使用Delphi讀取utf8格式時需使用Tmeminifile，另外動態取得的範例。

VAR SYSINI: TMemIniFile; // 讀取utf8格式的ini需使用TMemIniFile
ts:tstringlist;
i:integer;
ApplicationPath:string;
begin
// 先取得目前執行路徑
ApplicationPath := ExtractFilePath(Application.exename);
if ApplicationPath[length(ApplicationPath)] = ‘\’ then
begin
ApplicationPath := copy(ApplicationPath, 1, length(ApplicationPath) – 1);
end;
// 讀取sys.ini裡的memberid區塊並顯示值
MEMO1.Lines.Clear;
ts:=tstringlist.Create;
SYSini := TMemIniFile.Create(ApplicationPath+’\sys.ini’,TEncoding.UTF8);
if NOT (SYSini = nil) then begin
sysini.ReadSection(‘memberid’,ts);
for I:=0 TO TS.Count-1 DO BEGIN
MEMO1.Lines.Add(TS[I]);
MEMO1.LINES.Add(sysini.ReadString(‘MEMBERID’,TS[I],”));
END;
end;
ts.Free;
end;

Visual Studio Dev Essentials計畫，免費取得開發工具

VisualStudioDevEssentials

微軟發表了Visual Studio Dev Essentials計畫，允許所有人使用Microsoft帳號加入後，可以取得免費的開發工具、雲端平台或是軟體折扣以及免費的使用額度還有訓練支援。

網址: https://www.visualstudio.com/zh-tw/products/visual-studio-dev-essentials-vs.aspx

VisualStudioDevEssentials01

VisualStudioDevEssentials02

VisualStudioDevEssentials03

RAD Studio 10 Seattle 行動開發成功案例分享研討會

由捷康科技所辦的RAD Studio 10 Seattle 行動開發成功案例分享研討會

RAD Studio 10 Seattle 行動開發成功案例分享研討會 (一) 張子仁先生

[研討會影片]

[研討會簡報]

 

RAD Studio 10 Seattle 行動開發成功案例分享研討會 (二) 廖啟甫先生

[研討會影片]

[研討會簡報]

[即時路況Apk]

[尋找加油站Apk]

 

RAD Studio 10 Seattle 行動開發成功案例分享研討會 (三) 文中資訊阮翔先生

[研討會影片]

[研討會簡報]

 

Delphi XE10裡面的setup_paserver作用

Delphi 的PAServer(Platform Assistant Server)是一個可跨平台的程式。一般安裝的是mac上面的pkg版本，但是有網友在問setup_paserver_upd1.exe 的版本作用是什麼？

這個版本是提供在32位元開發的朋友，如果要編譯成64位元版本時，可以在64位元的電腦上安裝paserver。接著透過連線的方式，將程式碼complier到64位元的windows環境。

POS系統結合iPASS一卡通範例

12219570_10153067567121541_5370508928219483252_n
12208306_10153067535151541_1778219125832501158_n
一卡通(iPASS)是與悠遊卡(EasyCard)都是台灣的電子票證智慧卡，二者都是使用RFID(菲利浦的MIFARE)技術。今天來分享大致的技術~
首先，您得先到一卡通官方網站中的”加入特約商店“，提供相關資料向一卡通票證公司申請，並向一卡通公司申請測試機器及卡片。
審核通過後，iPASS一卡通公司會提供一台一卡通的測試機器，以及相關的文件及SDK。SDK與之前刷卡系統神似~
主要是輸入長度62的in.txt;輸出的out.txt則為109~928(有無交易記錄)。
1447167886093

餐飲POS新利器-取餐呼叫器與程式連線結合範例

_sE_4843323437

11221600_10153061581601541_7866645605585747097_n

12191428_10153061581676541_4081491775779063707_n

11200883_395736973959542_2078442132751771489_n

在國外行之有年的取餐呼叫器(Pager)最近也在台灣風行起來，看到了二款取餐呼叫器，一個是國產亞克高科(ARCT)由銥特爾科技(02-29974000)代理，一個是韓國(Syscall)製造由鋐鈦科技代理。
二款都可以透過COM PORT設定~~ 以Delphi以及C#針對韓國的做範例。
Delphi

var iPagerno   :Integer;
    sStr,s :AnsiString;
begin
   Try
     Pager_COM.StopComm;  // 先將Pager Com關閉
     Pager_COM.CommName := ComName;
     Pager_COM.StartComm;
     Sleep(50);  //開啟COM需等待
     iPagerno := StrToIntDef(PagerNo,1);
     sStr := copy(IntToStr(iPagerno),1,4)
     s:=  Ansichar(#開始指令)+sStr+Ansichar(#結束指令);
     Pager_COM.WriteCommData(PAnsiChar(s),Length(s));
   Except
   End;

C#

       public void Pager_Send(String COMName,String PagerNo)
        {
public static System.IO.Ports.SerialPort PAGERPORT = new System.IO.Ports.SerialPort();
            byte[] PAGERSTART = { 開始指令 };       
            byte[] PAGEREND = { 結束指令 };  
            try
            {
                if (PAGERPORT.IsOpen)
                    PAGERPORT.Close();
                PAGERPORT.PortName = COMName;
                PAGERPORT.BaudRate = 9600;
                PAGERPORT.Parity = System.IO.Ports.Parity.None;
                PAGERPORT.DataBits = 8;
                PAGERPORT.StopBits = System.IO.Ports.StopBits.One;
                PAGERPORT.Open();
             if (!PAGERPORT.IsOpen)
                PAGERPORT.Open();
            for (int i = 0; i < PAGERSTART.Length; i++)
            {
                PAGERPORT.Write(PAGERSTART , i, 1);
            }
                PagerNo = PagerNo.PadLeft(4, '0').ToString();
                byte[] PagerNoData= Encoding.Default.GetBytes(PagerNo);
            if (!PAGERPORT.IsOpen)
                PAGERPORT.Open();
            for (int i = 0; i < PagerNoData.Length; i++)
            {
                PAGERPORT.Write(PagerNoData, i, 1);
            }
                         if (!PAGERPORT.IsOpen)
                PAGERPORT.Open();
            for (int i = 0; i < PAGEREND .Length; i++)
            {
                PAGERPORT.Write(PAGEREND , i, 1);
            }
            }
            catch
            {    
               
             
                return;
            }
        }