Компания Borland(TM) выпустила новую линейку продуктов TURBO: Turbo Delphi, Turbo Delphi for .NET, Turbo C++ и Turbo C#.
http://www.borland.com/downloads/download_turbo.html
http://www.turboexplorer.com/
Всего в теме 540 сообщений
Добавить свое сообщение
Отслеживать это обсуждение 
№ 290 03-10-2006 14:24 |  |
Ответ на »сообщение 289« (panda)
___________________________
Но при чём тут Turbo? В семёрке код вроде такой же.
№ 289 03-10-2006 13:09 |  |
Ответ на »сообщение 283« (DRON)
___________________________
Что-то я не понял в чём проблема, в том что FISQLConnection будет равен nil?
Status := FISQLConnection.getErrorMessage(ServerMessage);
при FISQLConnection вызовет исключение Access Violation at address $00000000
№ 288 03-10-2006 12:44 |  |
№ 287 03-10-2006 12:16 |  |
№ 286 03-10-2006 12:13 |  |
№ 285 03-10-2006 10:24 |  |
№ 284 03-10-2006 10:14 |  |
№ 283 03-10-2006 07:14 |  |
Ответ на »сообщение 282« (panda)
___________________________
Что-то я не понял в чём проблема, в том что FISQLConnection будет равен nil?
№ 282 03-10-2006 06:51 |  |
Фрагмент исходников dbExpress из Turbo Delphi:
procedure TSQLConnection.DoConnect;
var
...
begin
...
Check(FSQLDriver.getSQLConnection(NewSQLConnection));
FISQLConnection := SQLConnection.Create(NewSQLConnection);
...
end;
function TSQLConnection.Check(Status: SQLResult): SQLResult;
begin
if Status <> 0 then SQLError(Status, exceptConnection);
Result := Status;
end;
procedure TSQLConnection.SQLError(OpStatus: SQLResult;
eType: TSQLExceptionType; const Command: TISQLCommand = nil);
var
...
begin
...
case eType of
...
exceptConnection:
Status := FISQLConnection.getErrorMessage(ServerMessage);
...
end;
...
end;
А теперь представим ситуацию, когда вызов FSQLDriver.getSQLConnection реально возвращает код ошибки (не равный 0)...
№ 281 03-10-2006 05:24 |  |
Добавить свое сообщение
Отслеживать это обсуждение 
Дополнительная навигация: |
|