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!

Register Log in
  • Congratulations derfloh 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. barrin

    Help: Exception cannot be handled error

    ...a version checker. Installed .NET Runtime(s) Current version:1.1.4322.573 Version 1.1 RTM (Visual Studio.NET 2003 / Windows Server 2003) Feb 2003 * 2.0.50727.42 Version 2.0 RTM (Visual Studio.NET 2005 RTM / SQL Server 2005 RTM) Nov 2005 ADO Database Runtime Version: 2.81.1128.0 Here's a...
  2. barrin

    Help with console

    The reason I was using the shortcutkey etc. was because I needed to trap the keyboard at the form level, so that when I pressed the arrow keys, my code would get executed directly rather than moving to the next tab in a tabset if it happens to be selected. I discovered that changing the Modifier...
  3. barrin

    Help with console

    procedure TRPG.WMHotKey(var Msg: TWMHotKey); begin if (Msg.HotKey = KeyID.Enter) then ConsoleButtonClick(nil) else if (Msg.HotKey = KeyID.Ctrl) then Map.Action; end; [/code] I apologize for all the posts. I'm not sure why it wouldn't process my posts. Is there a maximum size for...
  4. barrin

    Help with console

    Also, I've been trying to trap the Ctrl key using a similar method to the enter key, but it doesn't seem to even count as a key in the WMHotKey procedure (it isn't even called). I assume this has something to do with shift states... [code] procedure TRPG.RPGCreate(Sender: TObject); var Key...
  5. barrin

    Help with console

    else if (QList = 3) then begin Map.MapObjects[Length(Map.MapObjects)-1].Action := StrToInt(CMessage); QList := QList + 1; ConsolePrompt(QArray[QList], 0); end else if (QList = 4) then begin Map.MapObjects[Length(Map.MapObjects)-1].CMessage := CMessage...
  6. barrin

    Help with console

    procedure TRPG.MECreateObjectButtonClick(Sender: TObject); const QArray: array[1..4] of String = ( 'Enter Object Name:', 'Enter Object Image:', 'Enter Object Action:', 'Enter Object Console Message:'); begin if (QList = 0) then begin SetLength(Map.MapObjects...
  7. barrin

    Help with console

    For some reason, the forum isn't letting me post my reply. I think it will let me post in chunks though. Hi, I got my console working using the following code. The only problem is that it will be somewhat difficult each time I want to implement a new set of questions. I will have to write a...
  8. barrin

    Help with console

    I will try that when I get home today... I just have a quick question though: When I trap the enter key, I need to call the SubmitButtonClick procedure. What do I include as a parameter for Sender: TObject? I tried without anything, and it told me I was missing parameters. I am unfamiliar with...
  9. barrin

    Help with console

    Thanks for the reply, I am already trapping at the form level, so the submit button was easy to implement, but I'm not sure how I'm going to manipulate that data that I collect inside that prompting procedure. That is, how does the program know to go back to that procedure, when the console is...
  10. barrin

    Help with console

    Hi, I have two components, a RichEdit which acts as a console, and an Edit which acts as input to the console. What I want to be able to do is prompt for several pieces of information in the console (RichEdit), while providing the information through the input (Edit). My problem is that I am...
  11. barrin

    2D Scrolling Platform Game

    Thanks for the reply. I downloaded DelphiX, but unfortunately it doesn't appear to be compatible with my Delphi 2005. Is there any way around this besides downgrading?
  12. barrin

    2D Scrolling Platform Game

    Hello, I'm just looking for some advice. First of all, I don't even know if its wise to use Delphi for this genre of game, but it's all I have to work with. I'm just a little bit unsure how I should approach the whole graphics element of the project. Should I use certain components or just like...
  13. barrin

    Tile-Grid Playing Area

    Yes and no. I had removed that when you advised me against it, but I had done it in another destructor. It works fine now. Now I can finally get into programming the sprite movement. I'll be sure to take things slowly so the errors don't pile up and I can pinpoint them more easily. Thanks, Pat
  14. barrin

    Tile-Grid Playing Area

    No need to apoligise, you've already been outstanding.. there was one thing I'm not sure if you had commented on it "Furthermore, whenever I exit my program, I recieve another error: Failed to load resources from resource file, Please check your setup." If you know what causes that (not...
  15. barrin

    Tile-Grid Playing Area

    That clears alot of things up... I should be able to implement it into my game now. Thanks for the post. I have to go to work now, but I'll look at it afterwards. If you're not too busy, do you think you could go through my game and pick out the other fatal flaws I seem to make all the time, so...
  16. barrin

    Tile-Grid Playing Area

    ...private { Private declarations } public { Public declarations } end; var Form2: TForm2; Map: TMap; implementation {$R *.nfm} constructor TMap.Create; var i, j: Integer; begin inherited Create; Screen := TCanvas.Create; Buffer := TCanvas.Create; AreaName :=...
  17. barrin

    Tile-Grid Playing Area

    Essentially that is what I am doing, within a program that already exists. All the errors are coming from what I've added. I could send you the code if you'd like to have a look at it.
  18. barrin

    Tile-Grid Playing Area

    Yes, I forgot to create Buffer and Screen. That issue is now solved, but for some reason luck isn't on my side. It seems like every step forward is 2 steps back for me... I'm now getting a "Canvas does not allow drawing" error on the same draw function. I've searched it on Google with plenty of...
  19. barrin

    Tile-Grid Playing Area

    ...TObject); var i, j: Integer; Dest, View: TRect; begin Map := TMap.Create; View.Left := 0; View.Top := 0; View.Right := 40*15; View.Bottom := 40*15; for i := 1 to 15 do begin Dest.Top := 40 * (i - 1); Dest.Bottom := 40 * i; for j := 1 to 15 do begin...
  20. barrin

    Tile-Grid Playing Area

    Buho, Interesting post, you've given me a little insight on how I'm going to do this. I have a question though, regarding the buffer. I've never really understood how you use it, code-wise. I searched it on Google, but I can't seem to find any relevant results. How do I draw bitmaps in the...

Part and Inventory Search

Back
Top