
不知道大家喜歡什麼樣的程式編輯器配色?不過我自己變喜歡黑底白字的!看起來舒爽且容易觀看
字型的話,則是使用Adobe免費釋出的Sourcecode Pro字型。
作者: 林壽山
AWS Activate網路新創公司的好伙伴!
AppWorks Demo Day 12屆
數位經濟行業
RS232 to Internet
FastReport 支援 Delphi 10.1 Beriln
一直陪著Delphi 成長的老字號報表工具FastReport 也支援了Delphi 10.1 Berlinhttps://www.fast-report.com/en/news/373/
Delphi Berlin跨平台條件編譯(Conditional compilation)
Delphi Berlin可以在不同平台裝置上執行,那程式可以依不同平台裝置跑嗎?
答案是可行的~只要透過條件編譯就可以了 範例如下
{$IFDEF MSWINDOWS}
LABEL1.Text := Label1.Text + '(電腦版)';
{$ENDIF}
{$IFDEF ANDROID}
LABEL1.Text := Label1.Text + '(安卓版)';
{$ENDIF}
{$IFDEF OSX}
LABEL1.Text := Label1.Text + '(MAC版)';
{$ENDIF}
{$IFDEF IOS}
LABEL1.Text := Label1.Text + '(IOS版)';
{$ENDIF}
初探Delphi Berlin FireUI APP Preview
Embarcadero免費REST除錯工具REST Debugger

REST Debugger這個工具是Embarcadero公司免費釋放給開發REST相關服務的工程師做為測試、除錯用的工具。例如我們想從Sonsterr這個網站取得吉他譜~
一、從Songsterr的API網址
https://www.songsterr.com/a/wa/api
從裡面知道http://www.songsterr.com/a/ra/ 後面帶songs.json即可
二、開啟REST Debugger
將http://www.songsterr.com/a/ra 填入url

進入Parameters頁籤,在Resource填入songs.json,接著按Add按鈕,填入Name pattern value:伍佰,然後按apply確認

最後按Send request按鈕取得內容即可
Delphi 10.1 Berlin新亮點 -FireUI Preview、ListView Designer、TAddressBook
MySQL求出二經緯度之間的距離(公尺)
假設自己的經緯度為 LAT,LNG
資料庫欄位_LAT,_LNG,_NAME,
SELECT CEIL((((ACOS(SIN((LAT*PI()/180)) * SIN((_LAT*PI()/180))+COS((LAT*PI()/180))
* COS((_LAT*PI()/180)) * COS(((LNG- _LNG)*PI()/180))))*180/PI())*60*1.1515*1.609344)*1000)
AS DISTANCE,_NAME
FROM TABLE_NAME
ORDER BY DISTANCE ASC
算出距離幾公尺


















