Results 1 to 7 of 7

Thread: Form help...

  1. #1
    Join Date
    Aug 2009
    Location
    Inside the Matrix...yes it has me, and it has you too.
    Posts
    1,896
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Form help...

    k well ive added a pic to my form, but is there any way to have it there without attaching the picture along with the script, and have them fill out the file path, and without the 7000 line BitmapFromString? (this is what i'm currently using and yes it IS 7000 lines)

    help?
    Last edited by Bionicle; 12-05-2009 at 08:06 PM.
    NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN

  2. #2
    Join Date
    Jan 2007
    Posts
    834
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    SCAR Code:
    b := loadbitmap({Location of your file as a string! (C:\Program Files\?? ect...});

    Here is MK's TImage; single post.

    Hope it helped.

  3. #3
    Join Date
    Aug 2009
    Location
    Inside the Matrix...yes it has me, and it has you too.
    Posts
    1,896
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Junkj View Post
    SCAR Code:
    b := loadbitmap({Location of your file as a string! (C:\Program Files\?? ect...});

    Here is MK's TImage; single post.

    Hope it helped.
    Quote Originally Posted by bionicle1800 View Post
    k well ive added a pic to my form, but is there any way to have it there without attaching the picture along with the script
    Thats what I ment by that :/ thanks anyway though lol
    NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN

  4. #4
    Join Date
    Jan 2007
    Posts
    834
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by bionicle1800 View Post
    Thats what I ment by that :/ thanks anyway though lol
    Errr.. what? You stated you wanted it by file path.

    and have them fill out the file path

  5. #5
    Join Date
    Aug 2009
    Location
    Inside the Matrix...yes it has me, and it has you too.
    Posts
    1,896
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by Junkj View Post
    Errr.. what? You stated you wanted it by file path.
    but is there any way to have it there without attaching the picture along with the script, and have them fill out the file path
    as in thats not what I want. lol sorry if i was a bit unclear
    NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN

  6. #6
    Join Date
    Oct 2006
    Posts
    500
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Lmao Junkj.

    Use your script to download it from a link? You could use a Google Code SVN to host it.

    SCAR Code:
    // Not sure where this was from

    function Download(URL, WhereTo: string; Shared: Boolean): Boolean;
    var
      theFile: Integer;
      fileData: string;
    begin
      theFile := ReWriteFile(WhereTo, Shared);
      if theFile > -1 then
      begin
        fileData := GetPage(URL);
        if fileData <> '' then
        if WriteFileString(theFile, fileData) then
        Result := True;
      end;
    end;

    function DownloadIncludes: Boolean;
    var
      i: Integer;
      Path: string;
      URL: array [0..1] of array [0..1] of string;
    begin
      Path := ScriptPath;
      URL[0][0] := 'http://someproject.googlecode.com/svn/trunk/Includes/bg.bmp';
      URL[0][1] := Path + 'bg.bmp';

      for i := 0 to 1 do // # of files
      begin
        WriteLn('Downloading include ' + IntToStr(i + 1));
        Writeln(URL[i][1]);
        if not Download(URL[i][0], URL[i][1], True) then
        begin
          ClearDebug;
          WriteLn('COULD NOT UPDATE INCLUDES');
          WriteLn('Check your Firewall Settings');
          Result := False;
          Exit;
        end else
          Result := True;
      end;
      if Result then
        Writeln('Update Successful')
      else
        Writeln('update Failed');
    end;

  7. #7
    Join Date
    Aug 2009
    Location
    Inside the Matrix...yes it has me, and it has you too.
    Posts
    1,896
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Quote Originally Posted by r!ch!e View Post
    Lmao Junkj.

    Use your script to download it from a link? You could use a Google Code SVN to host it.

    SCAR Code:
    // Not sure where this was from

    function Download(URL, WhereTo: string; Shared: Boolean): Boolean;
    var
      theFile: Integer;
      fileData: string;
    begin
      theFile := ReWriteFile(WhereTo, Shared);
      if theFile > -1 then
      begin
        fileData := GetPage(URL);
        if fileData <> '' then
        if WriteFileString(theFile, fileData) then
        Result := True;
      end;
    end;

    function DownloadIncludes: Boolean;
    var
      i: Integer;
      Path: string;
      URL: array [0..1] of array [0..1] of string;
    begin
      Path := ScriptPath;
      URL[0][0] := 'http://someproject.googlecode.com/svn/trunk/Includes/bg.bmp';
      URL[0][1] := Path + 'bg.bmp';

      for i := 0 to 1 do // # of files
      begin
        WriteLn('Downloading include ' + IntToStr(i + 1));
        Writeln(URL[i][1]);
        if not Download(URL[i][0], URL[i][1], True) then
        begin
          ClearDebug;
          WriteLn('COULD NOT UPDATE INCLUDES');
          WriteLn('Check your Firewall Settings');
          Result := False;
          Exit;
        end else
          Result := True;
      end;
      if Result then
        Writeln('Update Successful')
      else
        Writeln('update Failed');
    end;
    thanks r!ch!e this is perfect ! <3 no homo
    NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN NYAN

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
  •