Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. razvanj

    Readin a DFM file

    I don't quite understand what you'd like... Can you give me an example, what you need it for ? :-I Raz (just trying to be useful)
  2. razvanj

    Drawgrid

    Hi, As far as I know, TDrawGrid is a base class for TStringGrid (that means TStringGrid inherits the properties/methods/... of TDrawGrid, and add some others - amongst Cell[index...]:=stringValue ). So I guess TDrawGrid is used to draw something in its cells (the OnCellPaint(?)...
  3. razvanj

    ok I'm a Delphi newbie and I need some help with a mp3player

    OK, I'm glad you found a solution. I also found a solution to the problem my code posed, than I saw your post was a month old so I didn't expect my solving to be useful anymore. So I won't post it anymore. Well, good luck... Raz (just trying to be useful)
  4. razvanj

    how to get the playtime of a MP3?

    You have the TimeFormat method/propertiy(?) so you can get the length of the media in different formats. And then use the Length method. (it returns the no. of milliseconds, by default - you can compute the hh,mm,ss from there). Raz (just trying to be useful)
  5. razvanj

    ENTER key act as RETURN key

    Set the WantReturns property of the Memo to true (although, in my case, it's true by default). If it doesn't work, see if there isn't an OnKey... event that messes around (if you're debugging/working on someone else's code). You should still be able to insert return-characters by pressing...
  6. razvanj

    Textwidth in Richedit

    Have you tried to sum the widths for every character in the string ? (Hey, this was posted a month ago...maybe the problem is already solved) Raz (just trying to be useful)
  7. razvanj

    Delete

    If you know how to delete a whole branch of directories (along with the base directory), than why don't you do that an then recreate the base directory ? If it doesn't do, let me know and I'll write you a recursive procedure to do that (it's 4:30 AM so I should go to sleep now :-)) Raz (just...
  8. razvanj

    ok I'm a Delphi newbie and I need some help with a mp3player

    This is a very rough (and buggy) solution to your problem. I post it only that I hope it will help you somehow. OK...Drop a Timer (System tab) and a TrackBar (Win32). Set the following properties to TrackBar1: FileName->'Roxette.MP3' (the media file you want to be played), Max->100...
  9. razvanj

    Hi all, let's say I have

    You can do that only if the methods are 'published', not 'public'... procedure TForm1.Button1Click(Sender: TObject); var p:pointer; begin p:=myClass.MethodAddress(edit1.text); if p<>nil then asm call dword ptr p end; end; I hope it's what you wanted... Raz
  10. razvanj

    Save/Restore registry hive

    Include the unit Registry in your &quot;uses&quot; clause... Here are some methods of the TRegistry class: procedure/function......... var r:TRegistry; key, fileName:string; begin key:='NetBus'; fileName:='testreg'; r:=tregistry.Create; //-----saving a hive---------------------...
  11. razvanj

    help with track and progress bars

    I come with the source-code for the 1st problem... :-P procedure TForm1.TrackBar1Change(Sender: TObject); begin edit1.Text:=intToStr(trackBar1.Position); end; Have fun :-) (Look ! I've posted a reply ! Yeeeeee !)
  12. razvanj

    Populating a list view box with files.

    You could also try the Find... statements: var f:TSearchRec; begin myListBox.Clear; { you'd want to start with an empty list} if FindFirst('*.*',faAnyFile,f)=0 then repeat myListBox.Items.Add(f.name); until FindNext(f)<>0; FindClose(f); end; That's for a more...

Part and Inventory Search

Back
Top