procedure TfrmCreSDatHIB.sgdCreateListGetFormat(Sender: TObject; ACol: Integer;
var AStyle: TSortStyle; var aPrefix, aSuffix: string);
begin
AStyle := ssAlphaCase;
end;
AStyle을 조정해 주면 된다.
형식은 다음과 같다.
TSortStyle = (ssAutomatic, ssAlphabetic, ssNumeric, ssDate, ssAlphaNoCase,
ssAlphaCase, ssShortDateEU, ssShortDateUS, ssCustom, ssFinancial, ssAnsiAlphaCase,
ssAnsiAlphaNoCase, ssRaw, ssHTML, ssImages, ssCheckBox
{$IFDEF TMSUNICODE}
, ssUnicode
{$ENDIF}
{$IFDEF DELPHI7_LVL}
, ssDateTime, ssTime
{$ENDIF}
, ssAlphaNumeric, ssAlphaNumericNoCase
);
var AStyle: TSortStyle; var aPrefix, aSuffix: string);
begin
AStyle := ssAlphaCase;
end;
AStyle을 조정해 주면 된다.
형식은 다음과 같다.
TSortStyle = (ssAutomatic, ssAlphabetic, ssNumeric, ssDate, ssAlphaNoCase,
ssAlphaCase, ssShortDateEU, ssShortDateUS, ssCustom, ssFinancial, ssAnsiAlphaCase,
ssAnsiAlphaNoCase, ssRaw, ssHTML, ssImages, ssCheckBox
{$IFDEF TMSUNICODE}
, ssUnicode
{$ENDIF}
{$IFDEF DELPHI7_LVL}
, ssDateTime, ssTime
{$ENDIF}
, ssAlphaNumeric, ssAlphaNumericNoCase
);