Page 1 of 3 123 LastLast
Results 1 to 25 of 63

Thread: Really need Help!!!

  1. #1
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default Really need Help!!!

    I keep trying but its to much above me! Im starting to get really p.o'ed at trying...

    Can Someone please just make me a form with tabs labeled:

    1. Player Setup
    2. Levels Setup
    3. Monster Setup
    4. Item Setup
    5. Players Options


    I need
    Player Setup :

    Labels :
    1. Username - Comes with edit box next to
    2. Password - Comes with edit box next to
    3. Nick - Comes with edit box next to (limit 4 chars)
    4. Active - Comes with a drop down (true is default)




    Levels Setup:


    Labels :
    1. Desired Attack Level - Comes with edit box next to
    2. Desired Strength Level - Comes with edit box next to
    3. Desired Defence Level - Comes with edit box next to
    4. Desired Range Level - Comes with edit box next to




    Monster Setup:

    Label : Left Click Monsters - Comes with Drop down true or false next to

    Label : Make sure you type the Capital first letter of the monsters name! And don't put a space before starting a next line in the monster form.

    Label : Example: "Chick(enter)Cow" Notice no space after Chick!

    Label next to memo box : Monsters to fight.

    Memo Box (just make a name so the strings can convert into a tstringarray).





    Item Setup:

    Something in this format:

    (label) Item Name: | (editbox) | (label) Item Id | (editbox)

    ^ Try to support as much id's and such as possible. *on my failed attempt I got 14.




    Players Options:


    Labels:
    1. Player will eat food with low health - Comes with (true/false) drop down box
    2. Health Level to eat food - Comes with edit box next to
    3. Multi-Way Combat Area - Comes with (true/false) drop down box





    Please make all option support for different players..

    Make it save info to something like

    SCAR Code:
    AppPath + '\includes\Zaszs_Alpha_Fighter\settings.INI'


    I will rep!!!
    I do visit every 2-6 months

  2. #2
    Join Date
    Jul 2007
    Location
    Ottawa, Canada
    Posts
    930
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    rofl zasz rep is getting to expensive!
    ~ Metagen

  3. #3
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    I really want this done, I feel this will never get done cause I can't do it.

    I will credit you for it...
    I do visit every 2-6 months

  4. #4
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  5. #5
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    What really gets me is the multiple players + assigning values, please someone just make this Forms are my kryptonite
    I do visit every 2-6 months

  6. #6
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Here's an example of a multiplayer form, that's basically what you need:
    scar Code:
    program New;

    var
      frmDesign : TForm;
      Tab : TPageControl;
      Tabs : Array Of TTabSheet;
      MainMenu : TMainMenu;
      Menus : Array [0..3] Of TMenuItem;
      GroupBox1 : TGroupBox;
      Edit1 : TEdit;
      Edit2 : TEdit;
      Edit3 : TEdit;
      Edit4 : TEdit;
      Edit5 : TEdit;

    procedure AddPlayer(Sender : TObject);
    begin
      SetLength(Tabs, Length(Tabs) + 1);
      Tabs[High(Tabs)] := TTabSheet.Create(frmDesign);
      Tabs[High(Tabs)].Caption := 'Player ' + IntToStr(Length(Tabs));
      Tabs[High(Tabs)].PageControl := Tab;
      GroupBox1 := TGroupBox.Create(frmDesign);
      GroupBox1.Parent := Tabs[High(Tabs)];
      GroupBox1.Left := 25;
      GroupBox1.Top := 25;
      GroupBox1.Width := 169;
      GroupBox1.Height := 121;
      GroupBox1.Caption := 'Username information';
      GroupBox1.TabOrder := 0;
      Edit1 := TEdit.Create(GroupBox1);
      Edit1.Parent := GroupBox1;
      Edit1.Left := 8;
      Edit1.Top := 24;
      Edit1.Width := 145;
      Edit1.Height := 24;
      Edit1.TabOrder := 0;
      Edit1.Text := 'Username';
      Edit2 := TEdit.Create(GroupBox1);
      Edit2.Parent := GroupBox1;
      Edit2.Left := 8;
      Edit2.Top := 56;
      Edit2.Width := 145;
      Edit2.Height := 24;
      Edit2.PasswordChar := '*';
      Edit2.TabOrder := 1;
      Edit2.Text := 'password';
      Edit3 := TEdit.Create(GroupBox1);
      Edit3.Parent := GroupBox1;
      Edit3.Left := 8;
      Edit3.Top := 88;
      Edit3.Width := 73;
      Edit3.Height := 24;
      Edit3.TabOrder := 2;
      Edit3.Text := 'Nick';
      Edit4 := TEdit.Create(frmDesign);
      Edit4.Parent := Tabs[High(Tabs)];
      Edit4.Left := 200;
      Edit4.Top := 50;
      Edit4.Width := 81;
      Edit4.Height := 24;
      Edit4.TabOrder := 9;
      Edit4.Text := 'Loads to do';
      Edit5 := TEdit.Create(frmDesign);
      Edit5.Parent := Tabs[High(Tabs)];
      Edit5.Left := 300;
      Edit5.Top := 50;
      Edit5.Width := 89;
      Edit5.Height := 24;
      Edit5.TabOrder := 10;
      Edit5.Text := 'Tree to chop';
    end;

    procedure RemovePlayer(Sender : TObject);
    begin
      Tabs[High(Tabs)].Free;
      SetLength(Tabs, Length(Tabs) - 1);
    end;

    procedure InitForm;
    begin
      frmDesign := CreateForm;
      with frmDesign do
      begin
        Position := poScreenCenter;
        frmDesign.Width := 414;
        frmDesign.Height := 374;
        Caption := 'frmDesign';
        Color := ClWhite;
        Font.Color := clWindowText;
        Font.Height := -14;
        Font.Name := 'MS Sans Serif';
        Font.Style := [];
        PixelsPerInch := 120;
      end;
      MainMenu := TMainMenu.Create(frmDesign);
      Menus[0] := TMenuItem.Create(frmDesign);
      Menus[0].Caption := 'Players';
      Menus[1] := TMenuItem.Create(frmDesign);
      Menus[1].Caption := 'Script';
      Menus[2] := TMenuItem.Create(frmDesign);
      Menus[2].Caption := 'Add player';
      Menus[2].OnClick := @AddPlayer;
      Menus[3] := TMenuItem.Create(frmDesign);
      Menus[3].Caption := 'Remove player';
      Menus[3].OnClick := @RemovePlayer;
      MainMenu.Items.Add(Menus[0]);
      MainMenu.Items.Add(Menus[1]);
      MainMenu.Items.Items[0].Add(Menus[2]);
      MainMenu.Items.Items[0].Add(Menus[3]);
      Tab := TPageControl.Create(frmDesign);
      With Tab Do
      Begin
        Parent := frmDesign;
        Align := AlClient;
      End;
    end;

    procedure SafeInitForm;
    var
      v : TVariantArray;
    begin
      SetArrayLength(v, 0);
      ThreadSafeCall('InitForm', v);
    end;

    procedure ShowInitFormModal;
    begin
      frmDesign.ShowModal;
    end;

    procedure SafeShowInitFormModal;
    var
      v : TVariantArray;
    begin
      SetArrayLength(v, 0);
      ThreadSafeCall('ShowInitFormModal', v);
    end;

    procedure MainInitForm;
    begin
      try
        SafeInitForm;
        SafeShowInitFormModal;
      finally
        FreeForm(frmDesign);
      except
        WriteLn('An error seems to have occurred in: InitForm');
      end;
    end;

    begin
      MainInitForm;
    end.
    Start reading tabs tutorials.


  7. #7
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    I can't do it........ I know all you guys are trying to teach me, but cmon! I been trying the past few days and just want this done Cause Once I open a new tab I have to save data from last tab, then what if the user decides to switch players, then I got to keep all the info....

    Please can someone make it for me .
    I do visit every 2-6 months

  8. #8
    Join Date
    Nov 2007
    Location
    Chile
    Posts
    1,901
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Make an array of edits, once an edit is created increment its length, so to call the saved information you just do:
    scar Code:
    Players[0].Name := Edits[0].Text;
    And so on.


  9. #9
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Dude, I must have Alzheimer's Disease specifically for forms

    Is it to hard for someone who actually can do this to do it?
    I do visit every 2-6 months

  10. #10
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  11. #11
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    ty
    I do visit every 2-6 months

  12. #12
    Join Date
    Aug 2007
    Location
    in a random little world
    Posts
    5,778
    Mentioned
    0 Post(s)
    Quoted
    7 Post(s)

  13. #13
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Post

    Ok i did the basic form but i didnt do the save players thing i got no idea on how to do it anyways here's the script...

  14. #14
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Try the SRLPlayerForm, very simple to use, and does the job nicely. <3 Summilion

  15. #15
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    Richard it's for his zasz alpha fighter i think he's already got srlplayer form i think he wants to upgrade^^
    Last edited by Kasi; 05-09-2009 at 01:26 AM.

  16. #16
    Join Date
    Dec 2007
    Location
    192.168.1.73
    Posts
    2,439
    Mentioned
    6 Post(s)
    Quoted
    119 Post(s)

    Default

    Meh just a suggestion, and Richard has a capital

  17. #17
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    lol sorry ill change

  18. #18
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    pur3b100d thanks but the thing that was troubling me the most was all the player setup in addition to the form. I don't know how to modify yours to support add more players.
    I do visit every 2-6 months

  19. #19
    Join Date
    Dec 2007
    Posts
    2,112
    Mentioned
    71 Post(s)
    Quoted
    580 Post(s)

    Default

    well basicly its all done there all u need to do is find a way of saving and u dont have to but you could add a few pics to it
    Edit : look through the tabs too...

  20. #20
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    hmm i thought i posted, but I need shut to do the editting cause im an idiot for that part.
    I do visit every 2-6 months

  21. #21
    Join Date
    Sep 2006
    Location
    include srl/srl.scar ( aussie)
    Posts
    2,875
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Dont you know how to use arrays?

  22. #22
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    not in conjunction with other players then saving the arrays for each player Confusing to much.
    I do visit every 2-6 months

  23. #23
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Wtf, this is easy. But really I am on my iPod and grounded from computer and cannot make it for you. I am grounded til Wednesday .

    I'll do it by then if you haven't had it.

    Edit: Do you want all these options saved for each player or no?

  24. #24
    Join Date
    Jan 2008
    Location
    California, US
    Posts
    2,765
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Make sure you type the Capital first letter of the monsters name! And don't put a space before starting a next line in the monster form.
    ???
    Lowercase(string);

  25. #25
    Join Date
    Oct 2007
    Location
    http://ushort.us/oqmd65
    Posts
    2,605
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    Quote Originally Posted by Da 0wner aka KyleIs1337 View Post
    ???
    Lowercase(string);
    No, it has to be uppercased... Purebloods is fine accept he didn't make it save the players and settings for each player. Just needs that.
    I do visit every 2-6 months

Page 1 of 3 123 LastLast

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •