Results 1 to 5 of 5

Thread: [Runtime Error] Cannot Make a Visible...........

  1. #1
    Join Date
    Mar 2007
    Posts
    120
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default [Runtime Error] Cannot Make a Visible...........

    Well, I'm working on my very first form, but I keep getting this error.......
    [Runtime Error] : Exception: Cannot make a visible window modal in line 87 in script.

    And this is my script.
    SCAR Code:
    program DudesAutoTalker;
    {.include SRL/SRL.scar}
    var
      frmDesign : TForm;
      Label1 : TLabel;
      Edit1 : TEdit;
      Button1 : TButton;


    Procedure AutoTalker(sender : tobject);
    begin
      repeat
       TypeSend(Edit1.Text);
      until(False);
    end;



    Procedure InitForm;
    Begin
    frmDesign := CreateForm;
    frmDesign.Left := 250;
    frmDesign.Top := 114;
    frmDesign.Width := 342;
    frmDesign.Height := 125;
    frmDesign.Caption := 'frmDesign';
    frmDesign.Color := clBtnFace;
    frmDesign.Font.Color := clWindowText;
    frmDesign.Font.Height := -11;
    frmDesign.Font.Name := 'MS Sans Serif';
    frmDesign.Font.Style := [];
    frmDesign.Visible := True;
    frmDesign.PixelsPerInch := 96;
    Label1 := TLabel.Create(frmDesign);
    Label1.Parent := frmDesign;
    Label1.Left := 51;
    Label1.Top := 4;
    Label1.Width := 230;
    Label1.Height := 32;
    Label1.Caption := 'Dudes Auto Talker!';
    Label1.Font.Color := clWindowText;
    Label1.Font.Height := -30;
    Label1.Font.Name := 'MS Sans Serif';
    Label1.Font.Style := [];
    Label1.ParentFont := False;
    Edit1 := TEdit.Create(frmDesign);
    Edit1.Parent := frmDesign;
    Edit1.Left := 3;
    Edit1.Top := 37;
    Edit1.Width := 330;
    Edit1.Height := 21;
    Edit1.TabOrder := 8;
    Edit1.Text := 'What Do You Want To Say?';
    Button1 := TButton.Create(frmDesign);
    Button1.Parent := frmDesign;
    Button1.Left := 3;
    Button1.Top := 61;
    Button1.Width := 330;
    Button1.Height := 36;
    Button1.Caption := 'Start Talking!';
    Button1.Font.Color := clWindowText;
    Button1.Font.Height := -20;
    Button1.Font.Name := 'MS Sans Serif';
    Button1.Font.Style := [];
    Button1.ParentFont := False;
    Button1.TabOrder := 9;
    end;

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

    procedure ShowFormModal;
    begin
      frmDesign.ShowModal;
    end;

    procedure SafeShowFormModal;
    var
      v: TVariantArray;
    begin
      setarraylength(V, 0);
      ThreadSafeCall('ShowFormModal', v);
    end;

    begin
      SafeInitForm;
      SafeShowFormModal;
    end.
    Auto Correctly! If I see you autoing with a level 3 account, normal clothes, consider yourself reported. You have been warned!
    Quote Originally Posted by Jagex
    We can (and do) ban them - including using IP bans

  2. #2
    Join Date
    Sep 2006
    Location
    New Jersey, USA
    Posts
    5,347
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    change frmDesign.Visible := True;

    to

    frmDesign.Visible := False;
    Interested in C# and Electrical Engineering? This might interest you.

  3. #3
    Join Date
    Mar 2007
    Posts
    120
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Alright thanks!

    It worked Thank you! Plus Repped!
    Auto Correctly! If I see you autoing with a level 3 account, normal clothes, consider yourself reported. You have been warned!
    Quote Originally Posted by Jagex
    We can (and do) ban them - including using IP bans

  4. #4
    Join Date
    Sep 2006
    Location
    New Jersey, USA
    Posts
    5,347
    Mentioned
    1 Post(s)
    Quoted
    3 Post(s)

    Default

    Thanks

    I forget to do that every time I make a form
    Interested in C# and Electrical Engineering? This might interest you.

  5. #5
    ronny.m.p Guest

    Default

    I should talk to freddy about changeing divi to makeing it false by default...

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. TOP - 50 Stats user now visible from main page.
    By WT-Fakawi in forum News and General
    Replies: 10
    Last Post: 10-12-2007, 07:03 AM
  2. [Runtime Error] : Exception: buffer error
    By GasMan in forum OSR Help
    Replies: 11
    Last Post: 05-13-2007, 02:07 PM
  3. RunTime Error
    By marneus901 in forum OSR Help
    Replies: 4
    Last Post: 03-26-2007, 07:13 AM
  4. Visible window modal? [lil help plz]
    By Sp0rky in forum OSR Help
    Replies: 1
    Last Post: 03-13-2007, 12:39 AM

Posting Permissions

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