Einzelnen Beitrag anzeigen

shmia

Registriert seit: 2. Mär 2004
5.508 Beiträge
 
Delphi 5 Professional
 
#3

Re: Irretierender Compiler-Hinweis

  Alt 15. Apr 2004, 13:33
Delphi-Quellcode:
function TPasswordDlg.fConnOpen : Boolean;
begin
    try
       // Verbindung aufbauen
        p_Connection.ConnectionString := OracleConnectString;
        p_Connection.Open;
    except
       // Fehler
        ShowErrors;
        // folgende Zeile ist überflüssig, da das Programm weiterläuft
        // und dann die unten markierte Zuweisung ausführt
        Result := p_Connection.Connected;
    end;
    Result := p_Connection.Connected; // * <-----
end;
Andreas
  Mit Zitat antworten Zitat