Jump to content

Peter Smit

Members
  • Posts

    6
  • Joined

  • Last visited

Recent Profile Visitors

340 profile views

Peter Smit's Achievements

Newbie

Newbie (1/4)

0

Reputation

  1. Trial, the delphi compiler also trial, are their limitations? are there any versions for Delphi 7? Sorry, i am use to working with the old Delphi 7.
  2. uniGUI 1.0.0 the UniScreenMask works beautiful on some pages but it would be nice if this component can have an option to add your spinner loading icon gif or some other examples would help. I also want to thank FMSoft UNIGUI Web Application Framework for developing their components for Delphi. are their any versions for Delphi 7?
  3. How to use animated gif to replace a UniScreenMask?
  4. Hi everyone, I found a way and got the Link click to work First you need to add this to the uses uniGUIVars, uniGUIApplication, StrUtils; Remember GetHTMLClick:= UniLabel also remember to set the TextConversion to txtHTML OnMouseEnter ----> GetHTMLClickMouseEnter: Code Var GetHTML:String; URL: String; begin URL:= ''; // clear GetHTML:= ''; // clear if LeftStr(HTMLUniDBEdit.Text, 7) = 'http://' then //check if the link has http and set the link begin URL:='<a href="' + HTMLUniDBEdit.Text + '" target="_blank">Visit</a>'; //set the address to show in a new page GetHTMLClick.Hint:= HTMLUniDBEdit.Text; //mouse over to show the link GetHTMLClick.Caption:= URL; end else begin GetHTMLClick.Hint:= 'http://' + HTMLUniDBEdit.Text; // mouse over to show the link with the added Http:// URL:= '<a href="' + GetHTMLClick.Hint + '" target="_blank">Visit</a>'; //set the address to show in a new page GetHTMLClick.Caption:= URL; end; end;
  5. Peter Smit

    Link Click

    Unigui is grate. I am trying to create a simple application with records of webpage addresses, I can do this I want to have a text link or button click from the UniDBedit to open a new page in the web browser. What am i doing wrong: This is what i did: OnMouseEnter ----> GetHTMLClickMouseEnter: Code Var GetHTML:String; begin GetHTML:= '<a href="' + HTMLUniDBEdit.Text + '/" target="new">Visit</a>'; <-----Copy the Address to GetHTMLClick GetHTMLClick.Hint:= HTMLUniDBEdit.Text; <----mouse over displays the web-address GetHTMLClick.Caption:= GetHTML; end; It is only working with some sites, is there a simple way that works The Unigui static example tested OK
  6. Peter Smit

    Link Click

    Unigui is grate. I am trying to create a simple application with records of webpage addresses, I can do this I want to have a text link or button click from the UniDBedit to open a new page in the web browser. What am i doing wrong: This is what i did: OnMouseEnter ----> GetHTMLClickMouseEnter: Code Var GetHTML:String; begin GetHTML:= '<a href="' + HTMLUniDBEdit.Text + '/" target="new">Visit</a>'; <-----Copy the Address to GetHTMLClick GetHTMLClick.Hint:= HTMLUniDBEdit.Text; <----mouse over displays the web-address GetHTMLClick.Caption:= GetHTML; end; It is only working with some sites, is there a simple way that works The Unigui static example tested OK
×
×
  • Create New...