日期: 2014 年 6 月 19 日

Facebook臉書一掛點~所有用到外掛的網站也哭哭了

facebookdown02

facebookdown01
一向是台灣朋友依賴的臉書(Facebook)，在下午接近四點全面性的癱瘓！有網友猜測是不是網軍的DDos攻擊，目前不得而知～
不過plurk、twitter等其他社群真的是一片哀嚎，許多人甚至把資料都丟在上面～結果完全找不到了！而許多利用facebook社群外掛的網站，除了版面大亂外，使用facebook登入機制的網站也不得其門而入…..

Delphi XE6透過backendpush發推播訊息

昨天在Codedata發表的那篇「Delphi APP 開發入門（七）通知與雲端推播」，網友問說可不可以自己寫一個Windows程式推播？當然是可以的！

一、到 Kinvey 中Addons -> Business Logic -> Custom Endpoints

Custom-Endpoints01

二、按下New新增，增加一個名稱為sendMessage的Endpoints

Custom-Endpoints02 Custom-Endpoints03

三、建立完成後在函數裡面加上下面的程式碼(如果對Custom Endpoints有興趣可以參考Custom Endpoints guide。

Custom-Endpoints04

  var iOSAps = request.body.iosaps;
  var push = modules.push;
  var iOSExtras = request.body.iosextras;
  var androidPayload = request.body.androidpayload;
  var androidmessage = androidPayload.message;
  var message = request.body.message;
  push.broadcastPayload(iOSAps, iOSExtras, androidPayload);
  response.complete( 200 );

四、接著回到程式部份，我們要在KinveyProvider1的PushEndpoint 屬性設定為在kinvey新增的endpoint名稱’sendMessage’。接著在畫面上增加BackendPush1，將Provider 設定為 KinveyProvider1

五、在畫面上新增Edit元件以及Button元件，在Button的onclick元件中寫上程式碼如下

procedure TForm1.Button1Click(Sender: TObject);
begin
  backendpush1.GCM.Message := edit1.Text;
  backendpush1.Push;
end;

這樣就可以了！一樣附上原始碼供大家參考
https://github.com/superlevin/XE6KinveyPush