Results 1 to 3 of 3

Thread: Form JPEG Image

  1. #1
    Join Date
    Dec 2007
    Posts
    2,766
    Mentioned
    2 Post(s)
    Quoted
    37 Post(s)

    Default Form JPEG Image

    Hi, I got a problem with my form :X.

    I tried to upload the Image. (In Form editor>Additional>Image)
    Here's my InitForm coding :

    SCAR Code:
    procedure InitForm;
    begin
      frmDesign := CreateForm;
      frmDesign.Left := 282;
      frmDesign.Top := 6;
      frmDesign.Width := 933;
      frmDesign.Height := 656;
      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 := False;
      frmDesign.PixelsPerInch := 96;
      Image1 := TImage.Create(frmDesign);
      Image1.Parent := frmDesign;
      Image1.Left := 0;
      Image1.Top := 0;
      Image1.Width := 929;
      Image1.Height := 625;
      Edit1 := TEdit.Create(frmDesign);
      Edit1.Parent := frmDesign;
      Edit1.Left := 704;
      Edit1.Top := 480;
      Edit1.Width := 209;
      Edit1.Height := 21;
      Edit1.TabOrder := 8;
      Edit1.Text := 'Username';
      Edit2 := TEdit.Create(frmDesign);
      Edit2.Parent := frmDesign;
      Edit2.Left := 704;
      Edit2.Top := 504;
      Edit2.Width := 209;
      Edit2.Height := 21;
      Edit2.TabOrder := 9;
      Edit2.Text := 'Password';
      Button1 := TButton.Create(frmDesign);
      Button1.OnClick := @ButtonClick;
      Button1.Parent := frmDesign;
      Button1.Left := 704;
      Button1.Top := 568;
      Button1.Width := 217;
      Button1.Height := 41;
      Button1.Caption := 'Start Script';
      Button1.Default := True;
      Button1.TabOrder := 10;
      Edit3 := TEdit.Create(frmDesign);
      Edit3.Parent := frmDesign;
      Edit3.Left := 704;
      Edit3.Top := 528;
      Edit3.Width := 209;
      Edit3.Height := 21;
      Edit3.TabOrder := 11;
      Edit3.Text := 'NickName (3-4 letters of your name)';
    end;

    And here's the picture i'm trying to upload... Maybe its too big ?



    I HAVE read fr0zn 's tutorial on pictures in Forms but I wasn't able to get it to work .

    Does it HAVE to be a bmp ?

    Thanks if you help me !!!

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

    Default

    Nice picture
    ~ Metagen

  3. #3
    Join Date
    Dec 2007
    Posts
    2,766
    Mentioned
    2 Post(s)
    Quoted
    37 Post(s)

    Default

    THAT HELPED ME TONZZZZ TY TY TY TY !!!!

    xD Metagen u'll always surprise me xD

    Still a problem

    OH MY F%@&ING GOD IM STUPID FFS!!!! I FOUND OUT HOW TO FIX THIS FFS IM STUPP333333333333D! !!!!

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Replies: 14
    Last Post: 06-07-2013, 02:46 AM
  2. Mass PNG to JPEG
    By Markus in forum Delphi/FPC Help and Tutorials
    Replies: 11
    Last Post: 02-24-2008, 06:34 PM
  3. Do i have to free an image thats set to another image?
    By NewToAutoing in forum OSR Help
    Replies: 14
    Last Post: 06-06-2007, 05:36 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
  •