Jump to content

eduardoA

Members
  • Posts

    12
  • Joined

  • Last visited

Contact Methods

  • Website URL
    http://eduardoalcantara.com
  • Skype
    eduardo.alcantara

Profile Information

  • Gender
    Male
  • Location
    Belem, PA, Amazonia, Brazil
  • Interests
    Delphi, Wordpress, Android, DaaS...

Recent Profile Visitors

572 profile views

eduardoA's Achievements

Newbie

Newbie (1/4)

0

Reputation

  1. Did not worked with me. And I can't find "UniGUIJSUtils" unit. I just put the color #EDF0F5 instead of using "uniColor2Web"
  2. function TPaginaPrincipal.TextWidth(s: TUniLabel): Integer; var c: TBitmap; f: TFont; begin { uma forma de calcular o tamanho de um texto na janela se o canvas não atualiza via ajax } c := TBitmap.Create; f := TFont.Create; Result := 8 * Length(s.Caption); f.Height := s.Font.Height; f.Size := s.Font.Size; f.Name := s.Font.Name; f.Style := s.Font.Style; try c.Canvas.Font.Assign(f); Result := c.Canvas.TextWidth(s.Caption); finally c.Free; end; end;
  3. eduardoA

    label width

    function TPaginaPrincipal.TextWidth(s: TUniLabel): Integer; var c: TBitmap; f: TFont; begin { uma forma de calcular o tamanho de um texto na janela se o canvas não atualiza via ajax } c := TBitmap.Create; f := TFont.Create; Result := 8 * Length(s.Caption); f.Height := s.Font.Height; f.Size := s.Font.Size; f.Name := s.Font.Name; f.Style := s.Font.Style; try c.Canvas.Font.Assign(f); Result := c.Canvas.TextWidth(s.Caption); finally c.Free; end; end;
  4. I want to build an application that have a TreeView and when user selects an item, it shows some information on a DBMemo. I want to build a functionality that when user requests the application with a parameter like ?ajax=1&id=1234 the application would send just the text from the selected row in database, but not the entire web application, like a webservice API. Is that possible?
  5. Hi Friends, I too need to change my controls width a lot, and a automatic solution would be very nice. We understand that sometimes we want to make better looking screens, so the controls must respond better to user commands and to run-time changes we made in the code. I found a way that is working very well to me. After you made any change that requires other controls to rearrange themselves, just put the code above: Self.With := Self.With +1; Self.With := Self.With -1; Refresh; Example of use: we put 2 panels and a splitter between then. They move fine, but if we have other controls inside those panels, and those controls are aligned with right, left or client, they won't resize unless you use the code I just mention. Farshad Mohajeri did a great job with his framework, but he can't understand that simple issue is real.
  6. Hi Friends, I too need to change my controls width a lot, and a automatic solution would be very nice. We understand that sometimes we want to make better looking screens, so the controls must respond better to user commands and to run-time changes we made in the code. I found a way that is working very well to me. After you made any change that requires other controls to rearrange themselves, just put the code above: Self.With := Self.With +1; Self.With := Self.With -1; Refresh; After that you can check the width and it will be shown ok. Example of use: we put 2 panels and a splitter between then. They move fine, but if we have other controls inside those panels, and those controls are aligned with right, left or client, they won't resize unless you use the code I just mention. Farshad Mohajeri did a great job with his framework, but he can't understand that simple issue is real.
  7. eduardoA

    label width

    Hi Friends, I too need to change my controls width a lot, and a automatic solution would be very nice. We understand that sometimes we want to make better looking screens, so the controls must respond better to user commands and to run-time changes we made in the code. I found a way that is working very well to me. After you made any change that requires other controls to rearrange themselves, just put the code above: Self.With := Self.With +1; Self.With := Self.With -1; Example of use: we put 2 panels and a splitter between then. They move fine, but if we have other controls inside those panels, and those controls are aligned with right, left or client, they won't resize unless you use the code I just mention. Farshad Mohajeri did a great job with his framework, but he can't understand that simple issue is real.
  8. Olá/Hi, Dionel. To access another page in Delphi Code using UniGUI: begin UniSession.AddJS('window.location = ''' + url + ''';'); // to use the same window {or} UniSession.AddJS('window.open(''https://support.wwf.org.uk'', ''_blank'');'); // to open a new window/tab end;
  9. Because sometimes we need to put a label inside a panel and we need to set the width of that panel with an image width plus label width, but we can't use AutoSize of UniPanel because you removed it in UniGUI project .
×
×
  • Create New...