小编Zeb*_*dee的帖子

如何快速获取本地日期格式?

我有yyyy-MM-ddTHH:mm:ssZ格式的CEST 日期。我想以本地格式显示它们。以下功能工作正常。它正确显示时间。但最后我被迫以“dd.MM.yyyy HH:mm”格式显示日期。如何从 iOS 获取本地/本机 DateFormat。

func changeTime()
    {
        myLabel.text = convertTimeZoneToLocal(timeZone: "CEST", date: "2017-09-27T18:25:42Z")
    }

func convertTimeZoneToLocal(timeZone:String, date:String) -> String {
    let dateFormatter = DateFormatter()
    dateFormatter.dateFormat = "yyyy-MM-dd'T'HH:mm:ssZ"
    dateFormatter.timeZone = TimeZone(abbreviation: timeZone)

    let dt = dateFormatter.date(from: date)
    dateFormatter.timeZone = TimeZone.current
    dateFormatter.dateFormat = "dd.MM.yyyy HH:mm"  // I want to change this line.

    return dateFormatter.string(from: dt!)
}
Run Code Online (Sandbox Code Playgroud)

xcode timezone date swift

4
推荐指数
1
解决办法
2596
查看次数

如何从 Firebird SQL 中的日期获取季度

我可以轻松获得本月和上月的总销售额。

SELECT ‘This Mount’,  SUM(Price) FROM Sales 
WHERE EXTRACT(MONTH FROM OrderDate) = EXTRACT(MONTH FROM CURRENT_DATE)   
  AND EXTRACT(YEAR FROM OrderDate) = EXTRACT(YEAR FROM CURRENT_DATE)   
Union All
SELECT ‘Previous Month’,  SUM(Price) FROM Sales 
WHERE EXTRACT(MONTH FROM OrderDate) = EXTRACT(MONTH FROM CURRENT_DATE)   
  AND EXTRACT(YEAR FROM OrderDate) = EXTRACT(YEAR FROM CURRENT_DATE)   
Run Code Online (Sandbox Code Playgroud)

我想获得本季度和上一季度的总销售额。

使用 MS-SQL 从日期中获取季度非常容易,如下所示:

SELECT DATEPART(QUARTER, @date)
Run Code Online (Sandbox Code Playgroud)

我怎样才能用 Firebird 做到这一点?

firebird date datepart

3
推荐指数
1
解决办法
1697
查看次数

以编程方式更改ShortCut图标

我使用以下代码创建快捷方式。

  var MyObject  : IUnknown;
  var MySLink   : IShellLink;
  var MyPFile   : IPersistFile;

  MyObject := CreateComObject(CLSID_ShellLink);
  MySLink  := MyObject as IShellLink;
  MyPFile  := MyObject as IPersistFile;
  with MySLink do
  begin
    SetPath(PChar(sExePath + sExeName));
    SetArguments(PChar (sParams));
    SetWorkingDirectory(PChar(sExePath));
  end;
  MyPFile.Save(PWChar(WideString(GetDesktopFolder + '\MyApp.lnk')), False);
Run Code Online (Sandbox Code Playgroud)

但是我想更改快捷方式图标。

例如,我在桌面上创建NOTEPAD.EXE的快捷方式。所以我该如何更改其图标。当您右键单击快捷方式时,选择属性,然后您会看到一个名为“ CHANGE ICON”的按钮,这就是我想要的。

我该如何使用代码呢?

delphi winapi shortcut

3
推荐指数
1
解决办法
104
查看次数

标签 统计

date ×2

datepart ×1

delphi ×1

firebird ×1

shortcut ×1

swift ×1

timezone ×1

winapi ×1

xcode ×1