FireDAC左连接TDBGrid：无匹配数据列升序时空值居下问题

问题原因 #

你遇到的情况是多数数据库默认排序规则导致的：

• 当LEFT JOIN无匹配关联时，关联列值为NULL（而非空字符串），主流数据库（如MySQL、SQL Server、Oracle）默认将NULL视为“大于所有非空值”的特殊值，因此升序时NULL排在非空值之后，降序时排在最顶部。
• 如果关联列是空字符串（''），理论上空字符串ASCII码为0应排在所有字符前，但数据库若使用忽略空格的特殊排序规则，也可能出现排序异常。

调整方法 #

方法1：修改SQL排序逻辑（推荐） #

直接在ORDER BY子句中处理空值/空字符串的优先级，强制让空条目排在升序首位：

• 通用兼容写法：

  ORDER BY 
    CASE WHEN 关联列 IS NULL OR 关联列 = '' THEN 0 ELSE 1 END ASC,
    关联列 ASC
  

  这段逻辑先将空条目（NULL/空字符串）标记为0，非空值标记为1，升序时0优先排前，再按关联列本身排序。
• 数据库特定简化写法：
  • MySQL：用IFNULL将NULL替换为空字符串

    ORDER BY IFNULL(关联列, '') ASC
    

  • SQL Server：用ISNULL处理NULL

    ORDER BY ISNULL(关联列, '') ASC
    

  • Oracle：用NVL替换NULL

    ORDER BY NVL(关联列, '') ASC
    

方法2：在TDBGrid层面自定义排序 #

若不想修改SQL，可利用TDBGrid的OnCompare事件自定义比较逻辑（以Delphi为例）：

1. 在Object Inspector中找到TDBGrid的OnCompare事件
2. 编写如下代码：

   procedure TForm1.DBGrid1Compare(Sender: TObject; DataLink: TDataLink;
     Field1, Field2: TField; CompareType: TCompareType; var CompareResult: Integer);
   var
     Val1, Val2: string;
   begin
     if Field1.FieldName = '你的关联列名' then
     begin
       Val1 := Trim(Field1.AsString);
       Val2 := Trim(Field2.AsString);
       // 强制空值/空字符串在升序时排前，降序时排后
       if (Val1 = '') and (Val2 <> '') then
         CompareResult := -1
       else if (Val1 <> '') and (Val2 = '') then
         CompareResult := 1
       else
         CompareResult := CompareText(Val1, Val2);
     end;
   end;
   

内容的提问来源于stack exchange，提问作者user3161924