QualityCentral

Public Report

Report From: Delphi-BCB/Internet/WebSnap [ Add a report in this area ]

Report #: 2419

Status: Reported

LinkToPage does not work correctly

Project: Delphi

Build #: 4.453

Version: 7.0

Submitted By: James P Chapman

Report Type: Basic functionality failure

Date Reported: 9/19/2002 3:13:26 PM

Severity: Commonly encountered problem

Last Updated: 5/2/2003 12:58:35 PM

Platform: All versions

Internal Tracking #:

Resolution: None

Resolved in Build: : None

Duplicate of: None

Voting and Rating

Overall Rating: (4 Total Ratings)

2.25 out of 5

Total Votes: None

Description

LinkToPage returns Success Page for both Error Page and Success Page.

Steps to Reproduce:

AdapterAction type only has one method  and it don't work.

  LinkToPage(PageSuccess, PageFail): AdapterAction, read

I hope I don't need to post more steps.  I have posted the source code fix as a workaround, but it is still unprocessed.

Workarounds

None

Attachment

None

Comments

Joe White at 9/20/2002 8:03:44 AM -

You should probably post some Steps...

Eric Brown at 9/22/2002 11:09:29 AM -

Actually, yes I'm using WebSnap for a commercial application. It's very solid and very reliable though I've never used LinkToPage... I may have to look into that call! :)

James P Chapman at 9/22/2002 12:14:45 PM -

Very cool, actually I have one production app that I moved to Websnap with Delphi 6 and have not had any problem, that is until Delphi 7. I have been programming in Delphi since version 1 and love it, don' want to get a reputation as a flamer, just a tad aggravated with Delphi 7 at the moment. I should have waited for the first service pack :-)

Fabio Oliveira at 9/30/2002 3:01:55 PM -

I get the same error using the project "Demos\WebSnap\CountryEditor\CountryEditorTestSvr.dpr".

1. Open the project and run it.

2. Open the browser and select the page "CountryTable"

3. Edit a country. Insert a invalid value at the field Area.

4. Apply the data.

5. The "ContryTable" page is showed whit the message "Invalid value for field 'Area'". The correct is to stay in the edit page.

Hanno Lohuis at 8/6/2003 12:02:18 AM -

I've also had the same problem. Tracing the VCL I found the following wrong code:

===================

unit WebSnapObjs;

/// ---- cut

function TAdapterActionObj.GetEncodedPages(EncodeAsQuery: Boolean): string;
var
  TempList: TStringList;
begin
      /// ---- cut

      if FSuccessPage <> '' then
        TempList.Add(sSuccessPageParamName + '=' + FSuccessPage);
      if FFailurePage <> '' then
        TempList.Add(sFailurePageParamName + '=' + FSuccessPage);

      /// ---- cut
end;

===================

As jou see, in case of an error, the succespage will be encoded. This must be FFailurePage.

Developer Tools

Database Tools