MikeZ87

Hi Group, Here's a weird one. I'm trying to count all of the files on a drive, so I'm doing a FindFirst('C:\*', faAnyFile, yadda yadda yadda) and counting the files [NOT directories,] and it's finding (exactly) 2184843 files. When I do a dir c:\* /s, it's finding (exactly) 1229974 files. (dir is also reporting 990877 directories.) Either way, these numbers aren't adding up. Any thought on what's going on? var MyTotal : Int64; //This gets set to 0 in the button.click code when FileSearch is initially run. procedure TForm1.FileSearch(const dirName:string); var searchResult: TSearchRec; begin if FindFirst('C:\*', faAnyFile, searchResult)=0 then begin try repeat MyTotal := MyTotal + 1; if (searchResult.Attr and faDirectory)=0 then begin //do stuff end else if (searchResult.Name<>'.') and (searchResult.Name<>'..') then begin FileSearch(IncludeTrailingBackSlash(dirName)+searchResult.Name); end; until FindNext(searchResult)<>0 finally FindClose(searchResult); end; end; end;

Hello, I'm trying to create a combobox that I can style to look like this. I'd **LIKE** to do it solely in the WYSIWYG style designer. Can anyone point me to a tutorial on how even to change the font size in the Style designer? I'm admittedly such a noob in this, but I'm at a total loss. Thanks. - Mike

That actually does make it A LOT easier. Thanks! I was going to ask you - after playing with this a little bit, I notice that the main text (ie: the text of the itemindex item) is BIG (like the style,) but the drop-down text is still tiny. How can I change the font size of the drop down text? Thanks again A MILLION!!! - Mike

OMG!!! ProgrammerDelphi2K!!!! OMG!!! THANK YOU!!!!! That's EXACTLY what I was looking for. I knew about the listitems, but couldn't put 2 and 2 together to figure that out. THANK YOU SO MUCH!!!!! It's working now! Much appreciated!

Hi All, Is there a way to have a TabControl in FireMonkey have multiple rows of tabs? (I have a lot of tabs, and their labels are quite long.) I seem to remember the VCL part of Delphi allowed for multiple rows of tabs, or a "<" [back] / ">" [forward] set of buttons that appeared if a single row of tabs extended past the borders of the tabcontrol. How can I turn this on, or how can I do it (programmatically?) I feel like I'm missing something simple. Thanks for the read and any assistance you can give me. - Mike

Greetings, I have a TMapView component on my firemonkey (android) form. It gets the map image nicely, and I can scroll, zoom in, etc... I need to be able to save that mapview image to storage on an android app, and I'm having no luck. I can't even copy it to another TImage component. Can anyone help me with this? - How can I save the mapview image to local storage on the android? - How can I copy the mapview image to another image component? I've tried things like image1.assign(mapview1.MakeScreenShot) to copy, and MapView1.MakeScreenShot.SaveToFile(filename), but neither of those work. (Assign doesn't do anything, and SaveTo results in an error. Any help would be appreciated. Thanks!

Hi Dave, OMG!!! THAT WORKED!!! You're my HERO!!! THANK YOU!!! I'm learning more and more Delphi every day, and **THIS** is huge! THANK YOU!!!

Thanks for the lead, Dave. I'm not really sure how to use that, and googling for help on it (with examples) doesn't yield any code. Could you give me an example?

Hello, I'm trying to write a program that needs the ability to go to a web page, then fill in information IN that webpage (ie: detect a form, determine the fields, fill in the field data,) and then submit the form. I'm using a TEdgeBrowser component. Questions: 1. Based on what I wrote above, is using a TEdgeBrowser component necessary? (Ultimately, the user doesn't necessarily need to see the data; the program should do most of the "surfing" automatically. 1b. If not, what method would you recommend? 2. If I should be using a TEdgeBrowser, what's the best way to determine the fields in an HTML form? 3. How can I automatically enter data into those fields? 4. ... and submit? Thanks! - Mike