View Issue Details

IDProjectCategoryView StatusLast Update
0003263JEDI VCL00 JVCL Componentspublic2005-11-22 06:12
Reportershicola2Assigned ToAHUser 
PrioritynormalSeveritymajorReproducibilityalways
Status resolvedResolutionfixed 
Product Version3.00 
Target VersionFixed in Version3.10 
Summary0003263: TOpenDialog (TSaveDialog) filterindex is ignored
DescriptionTOpenDialog Filterindex is ignored.
I cannot access real filterindex from dialog, i allways get 0.


Additional InformationThis bug is in 2.10 version too.
TagsNo tags attached.

Activities

shicola2

2005-10-11 00:40

reporter   ~0008013

Sorry, I mean TJvOpenDialog and TJvSaveDialog.

remkobonte

2005-10-13 15:26

developer   ~0008023

I can not reproduce this bug. So please make a demo program that shows the error and upload it to this bug report)

shicola2

2005-10-13 23:27

reporter   ~0008026

sorry for some mistakes.
i don't have version 3.0 currently installed but i post demo from version 2.10 with TJvOpenDialog2000 where is the same bug.
And i allways get filterindex 1 not 0.

sample from demo (jvcl 2.10):

procedure TForm1.Button1Click(Sender: TObject);
begin
  JvOpenDialog20001.filter := 'ext 1|*.1|ext 2|*.2|ext 3|*.3';
  if JvOpenDialog20001.execute then
    showmessage(inttostr(JvOpenDialog20001.filterindex));
end;

in jvcl 3.0 is JvOpenDialog20001 deprecated and can be used JvOpenDialog which has the same bug.

2005-10-13 23:36

 

FilterIndexBug.exe (336,896 bytes)

shicola2

2005-10-13 23:42

reporter   ~0008027

Finally note:

TOpenDialog - OK
TJvOpenDialog 2.10 - OK
TJvOpenDialog2000 2.10 - bug
TJvOpenDialog 3.0 - bug

I tested it on D5 Ent. WinXP.

shicola2

2005-10-23 22:46

reporter   ~0008051

I fix it in JvDialog.pas, in function TJvOpenDialog.TaskModalDialog:

...
DialogData2000.FlagsEx := PlacesBar[FShowPlacesBar];
Result := inherited TaskModalDialog(DialogFunc, DialogData2000);
//ShiCola add - bug with FilterIndex
TOpenFileName(DialogData).nFilterIndex := DialogData2000.OpenFileName.nFilterIndex;
{$ELSE}
...

bye ShiCola

AHUser

2005-11-22 06:12

developer   ~0008119

Fixed in CVS

Issue History

Date Modified Username Field Change
2005-10-11 00:28 shicola2 New Issue
2005-10-11 00:40 shicola2 Note Added: 0008013
2005-10-13 15:26 remkobonte Note Added: 0008023
2005-10-13 15:26 remkobonte Status new => feedback
2005-10-13 23:27 shicola2 Note Added: 0008026
2005-10-13 23:36 shicola2 File Added: FilterIndexBug.exe
2005-10-13 23:42 shicola2 Note Added: 0008027
2005-10-23 22:46 shicola2 Note Added: 0008051
2005-11-22 06:12 AHUser Status feedback => resolved
2005-11-22 06:12 AHUser Resolution open => fixed
2005-11-22 06:12 AHUser Assigned To => AHUser
2005-11-22 06:12 AHUser Note Added: 0008119