[Webinar] Streamline your web hosting managementRegister Today

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 303
  • Last Modified:

Replacement to the FilterComboBox??

Hi!,

I need combonent which is similar to the FilterComboBox.
So you probably wonder why?? Because FilterComboBox does not handle quite well long string list mask's. It cuts at end of the mask, few file masks away. So is there any freeware combonent what done's file maskin better than FilterComboBox?? Or is there another way that can i handle huge masks??

Regards Marko
0
mhieta
Asked:
mhieta
  • 3
  • 3
1 Solution
 
Mohammed NasmanSoftware DeveloperCommented:
Hello

  I havn't seen any component to do that, maybe you need to make the filtercombobox width to handle all the strings, but i think for better way, add hint to the filtercombobox when you move the mouse above line not complete like delphi do when you choose press dot after component name
0
 
mhietaAuthor Commented:
Hello,

Do you mean like this to the hint:

*.BMP;*.RLE;*.DIB;*.JPG;*.JPE;*.JPEG;*.JFIF;
*.WMF;*.ICO;*.GIF;*.TIF;*.TIFF;*.TGA;*.VST;
*.ICB;*.VDA;*.WIN;*.BW;*.RGB;*.RGBA;*.SGI;
*.CEL;*.PIC;*.PCX;*.PCC;*.SCR;*.PCD;*.PPM;
*.PGM;*.PBM;*.CUT;*.PAL;*.PSD;*.PDD;*.RLA;
*.RPF;*.FAX;*.PSP;*.PNG

Now i use this code and it works fine.

  if FilterComboBox1.ItemIndex = 0 then
  begin
  FilterComboBox1.Hint:='*.gif;*.png;*.psp;*.cut;*.pcd;*.pic;*.cel;*.pbm;*.pgm;*.ppm;*.pdd;*.psd;*.bw;*.rgb;*.rgba;*.sgi;*.rla;*.rpf;*.scr;*.pcc;*.pcx;*.eps;*.fax;*.tif;*.tiff;*.icb;*.tga;*.vda;*.vst;*.win;*.dib;*.rle;*.jpeg;*.jpe;*.jpg;*.jfif;*.emf;*.wmf;*.ico;*.bmp';
  end
  else
  begin
  FilterComboBox1.Hint:=FilterComboBox1.Mask;
  end;
  if FilterComboBox1.ItemIndex = 0 then
  begin
  DirView1.Mask:='*.gif;*.png;*.psp;*.cut;*.pcd;*.pic;*.cel;*.pbm;*.pgm;*.ppm;*.pdd;*.psd;*.bw;*.rgb;*.rgba;*.sgi;*.rla;*.rpf;*.scr;*.pcc;*.pcx;*.eps;*.fax;*.tif;*.tiff;*.icb;*.tga;*.vda;*.vst;*.win;*.dib;*.rle;*.jpeg;*.jpe;*.jpg;*.jfif;*.emf;*.wmf;*.ico;*.bmp';
  FileNameSearch.FileListBox1.Mask:='*.gif;*.png;*.psp;*.cut;*.pcd;*.pic;*.cel;*.pbm;*.pgm;*.ppm;*.pdd;*.psd;*.bw;*.rgb;*.rgba;*.sgi;*.rla;*.rpf;*.scr;*.pcc;*.pcx;*.eps;*.fax;*.tif;*.tiff;*.icb;*.tga;*.vda;*.vst;*.win;*.dib;*.rle;*.jpeg;*.jpe;*.jpg;*.jfif;*.emf;*.wmf;*.ico;*.bmp';
  end
  else
  begin
  DirView1.Mask:=FilterComboBox1.Mask;
  FileNameSearch.FileListBox1.Mask:=DirView1.Mask;
  end;

But if you have more sophisticated method to display current mask in the hint, i'm listening.

Regards Marko
0
 
Mohammed NasmanSoftware DeveloperCommented:
try this

FilterComboBox1.Hint := FilterComboBox1.Mask;
or
FilterComboBox1.Hint := FilterComboBox1.Filter;
 
0
Take Control of Web Hosting For Your Clients

As a web developer or IT admin, successfully managing multiple client accounts can be challenging. In this webinar we will look at the tools provided by Media Temple and Plesk to make managing your clients’ hosting easier.

 
mhietaAuthor Commented:
FilterComboBox1.Hint := FilterComboBox1.Mask;
or
FilterComboBox1.Hint := FilterComboBox1.Filter;

Those are not working either. Both cases cuts at end of the mask, few file masks away.

I think if there isn't any replacement to the FilterComboBox to handle huge mask strings. And my code solves problem fine. I will delete this question soon.

Regards Marko

0
 
Mohammed NasmanSoftware DeveloperCommented:
Hello

  separate ur hint to lines using #13

combobox1.Hint := '*.gif;*.png;*.psp;*.cut;*.pcd;*.pic;*.cel;' + #13 + '*.pbm;*.pgm;*.ppm;*.pdd;*.psd;*.bw;*.rgb;*.rgba;*.sgi;*.rla;*.rpf;*.scr;*.pcc;*.pcx;*.eps;*.fax;*.tif;*.tiff;*.icb;*.tga;*.vda;*.vst;*.win;*.dib;' + #13+ '*.rle;*.jpeg;*.jpe;*.jpg;*.jfif;*.emf;*.wmf;*.ico;*.bmp';
0
 
mhietaAuthor Commented:
Ok, thanks mnasman. Now Hint looks better than it was.

See you at next question...

Regards Marko
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

  • 3
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now