pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

RxMDI - fix MDIForm.ActiveControl on change MDI windows

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2752 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2013-06-14 18:44:58 +00:00
parent cb3ce470f6
commit e8883e24af
9 changed files with 87 additions and 86 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/rx/dateutil.pas
View File

@ -434,10 +434,8 @@ begin
Result := False;
Y := 0; M := 0; D := 0;
DateOrder := GetDateOrder(DateFormat);
{$IFDEF RX_D3}
if ShortDateFormat[1] = 'g' then { skip over prefix text }
if DefaultFormatSettings.ShortDateFormat[1] = 'g' then { skip over prefix text }
ScanToNumber(S, Pos);
{$ENDIF RX_D3}
if not (ScanNumber(S, MaxInt, Pos, N1) and ScanChar(S, Pos, DateSeparator) and
ScanNumber(S, MaxInt, Pos, N2)) then Exit;
if ScanChar(S, Pos, DateSeparator) then begin