paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-19 00:19:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ Merged revision 315

Browse Source 
git-svn-id: branches/fixes_2_0@316 -
This commit is contained in:
michael 2005-06-09 18:08:40 +00:00
parent da7ab6c641
commit 8c06201915
2 changed files with 0 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
rtl/inc/variant.inc
View File

@ -476,12 +476,10 @@ begin
end;
{$ifdef HASOVERLOADASSIGNBYUNIQUERESULT}
operator :=(const source : variant) dest : tdatetime;
begin
dest:=variantmanager.vartotdatetime(source);
end;
{$endif HASOVERLOADASSIGNBYUNIQUERESULT}
{**********************************************************************
Operators

2
rtl/inc/varianth.inc
View File

@ -292,9 +292,7 @@ operator :=(const source : variant) dest : comp;
{ Misc. }
operator :=(const source : variant) dest : currency;
{$ifdef HASOVERLOADASSIGNBYUNIQUERESULT}
operator :=(const source : variant) dest : tdatetime;
{$endif HASOVERLOADASSIGNBYUNIQUERESULT}
{**********************************************************************
Operators