- Recompilado para D2007 UPD3
- Cambiado el formato de fechas de 'MM/DD/YYYY' a 'DD/MM/YYYY' (da problemas con SQL Server). git-svn-id: https://192.168.0.254/svn/Componentes.Terceros.UserControl@15 970f2627-a9d2-4748-b3d4-b5283c4fe7db
This commit is contained in:
parent
630e91ec0c
commit
785004c326
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
@ -12,5 +12,5 @@ STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
/* C:\UserControl\Packages\Connectors\UCADOConn\pckUCADOConn.res */
|
||||
/* C:\UserControl\Packages\Connectors\UCADOConn\pckUCADOConn.drf */
|
||||
/* C:\User Control\Packages\Connectors\UCADOConn\pckUCADOConn.res */
|
||||
/* C:\User Control\Packages\Connectors\UCADOConn\pckUCADOConn.drf */
|
||||
|
||||
@ -12,5 +12,5 @@ STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
/* C:\UserControl\Packages\Connectors\UCBDEConn\pckUCBDEConn.res */
|
||||
/* C:\UserControl\Packages\Connectors\UCBDEConn\pckUCBDEConn.drf */
|
||||
/* C:\User Control\Packages\Connectors\UCBDEConn\pckUCBDEConn.res */
|
||||
/* C:\User Control\Packages\Connectors\UCBDEConn\pckUCBDEConn.drf */
|
||||
|
||||
@ -12,5 +12,5 @@ STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
/* C:\UserControl\Packages\Connectors\UCDBXConn\pckUCDBXConn.res */
|
||||
/* C:\UserControl\Packages\Connectors\UCDBXConn\pckUCDBXConn.drf */
|
||||
/* C:\User Control\Packages\Connectors\UCDBXConn\pckUCDBXConn.res */
|
||||
/* C:\User Control\Packages\Connectors\UCDBXConn\pckUCDBXConn.drf */
|
||||
|
||||
@ -12,5 +12,5 @@ STRINGTABLE
|
||||
BEGIN
|
||||
END
|
||||
|
||||
/* C:\UserControl\Packages\Connectors\UCIBXConn\pckUCIBXConn.res */
|
||||
/* C:\UserControl\Packages\Connectors\UCIBXConn\pckUCIBXConn.drf */
|
||||
/* C:\User Control\Packages\Connectors\UCIBXConn\pckUCIBXConn.res */
|
||||
/* C:\User Control\Packages\Connectors\UCIBXConn\pckUCIBXConn.drf */
|
||||
|
||||
@ -1850,7 +1850,7 @@ begin
|
||||
Profile,
|
||||
QuotedStr('U'),
|
||||
QuotedStr(Key),
|
||||
QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FLogin.fDaysOfSunExpired) ), {By vicente Barros Leonel }
|
||||
QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FLogin.fDaysOfSunExpired) ), {By vicente Barros Leonel } { Rodax Software }
|
||||
UserExpired,
|
||||
DaysExpired ]); {By vicente Barros Leonel }
|
||||
DataConnector.UCExecSQL(SQLStmt);
|
||||
@ -1893,13 +1893,13 @@ begin
|
||||
cPadrao: cSql := 'Update ' + TableUsers.TableName +
|
||||
' Set ' + TableUsers.FieldPassword + ' = ' + QuotedStr(Encrypt(NewPassword,EncryptKey)) +
|
||||
', ' + TableUsers.FieldKey + ' = ' + QuotedStr(Key) +
|
||||
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel
|
||||
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel { Rodax Software }
|
||||
' Where ' + TableUsers.FieldUserID + ' = ' + IntToStr(IdUser);
|
||||
|
||||
cMD5: cSql := 'Update ' + TableUsers.TableName +
|
||||
' Set ' + TableUsers.FieldPassword + ' = ' + QuotedStr(MD5Sum(NewPassword)) +
|
||||
', ' + TableUsers.FieldKey + ' = ' + QuotedStr(Key) +
|
||||
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel
|
||||
', ' + TableUsers.FieldDateExpired + ' = ' + QuotedStr( FormatDateTime('dd/mm/yyyy',Date + FCurrentUser.UserDaysExpired ) ) + // by vicente barros leonel { Rodax Software }
|
||||
' Where ' + TableUsers.FieldUserID + ' = ' + IntToStr(IdUser);
|
||||
end;
|
||||
|
||||
@ -2096,7 +2096,7 @@ begin
|
||||
Sql := Format('update %s set %s = %s where %s = ''U''',
|
||||
[ FTableUsers.TableName,
|
||||
FTableUsers.FieldDateExpired,
|
||||
QuotedStr( FormatDateTime('mm/dd/yyyy',Date + FLogin.fDaysOfSunExpired ) ),
|
||||
QuotedStr( FormatDateTime('dd/mm/yyyy', Date + FLogin.fDaysOfSunExpired ) ),{ Rodax Software }
|
||||
FTableUsers.FieldTypeRec ] );
|
||||
DataConnector.UCExecSQL( Sql );
|
||||
End;
|
||||
@ -4821,7 +4821,7 @@ begin
|
||||
[ fUserControl.TableHistory.TableName ,
|
||||
QuotedStr(AppID),
|
||||
UserID,
|
||||
QuotedStr( FormatDateTime('mm/dd/yyyy',date) ),
|
||||
QuotedStr( FormatDateTime('dd/mm/yyyy',date) ), { Rodax Software }
|
||||
QuotedStr( FormatDateTime('hh:mm:ss',time) ),
|
||||
QuotedStr( Form ),
|
||||
QuotedStr( FormCaption ),
|
||||
|
||||
Loading…
Reference in New Issue
Block a user