PDA

Ver la Versión Completa : Ayuda Con La Interfaz


naruto2308
14-10-2015, 15:22:02
Hola como estan, tengo Rad Studio XE8 no llevo mucho en delphi pero tengo algunos conocimientos apenas llevo 2 o 3 meses en delphi pero me sucede algo que cuando elijo android de 5 pulgadas en el view, me sale todo bien claro no puedo eliminar desde hay pero en el master si, nose si mi delphi este malo o mis telefonos no tienen las pulgadas exactas pero siempre que compilo una aplicacion me sale un poco descuadrada es decir me sale un boton a la derecha el tool bar sale fuera de la pantalla cosas asi, he probado con 2 telefonos diferentes un X9 De 5 pulgadas y un samsung galaxy Grand neo tambien de 5 y en los 2 salen de igual forma.


Otros problemas que me esta dando el Rad Estudio es que no me aparecen los stylelookup que he visto en youtube por ejemplo en android solo me apareen 2 barras al momento de cambiar el estilo del toolbar nose porque , tambien no me sale en aling la opcion de allclient solo me aparece client y nose porque, esta malo mi delphi tengo licencia de año y el Rad pesa como 6 gb o mas nose.

Casimiro Notevi
14-10-2015, 16:57:43
Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php), gracias por tu colaboración :)

naruto2308
14-10-2015, 17:24:26
ahora en la aplicacion no me sale el menu draw no entiendo
le doy click y no sale y ademas no puedo cambiar el color del label alguien me puede ayudar?
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Ani,
FMX.StdCtrls, FMX.Controls.Presentation, FMX.ListBox, FMX.Layouts;

type
TForm2 = class(TForm)
ListBox1: TListBox;
ListBoxItem1: TListBoxItem;
ListBoxItem2: TListBoxItem;
ListBoxItem3: TListBoxItem;
ListBoxGroupHeader1: TListBoxGroupHeader;
Panel1: TPanel;
ToolBar1: TToolBar;
SpeedButton1: TSpeedButton;
AnimationD: TFloatAnimation;
Button1: TButton;
Label1: TLabel;
ListBoxGroupHeader2: TListBoxGroupHeader;
ListBoxItem4: TListBoxItem;
procedure SpeedButton1Click(Sender: TObject);
procedure Label1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form2: TForm2;


implementation

{$R *.fmx}
{$R *.LgXhdpiPh.fmx ANDROID}
{$R *.Windows.fmx MSWINDOWS}

procedure TForm2.Label1Click(Sender: TObject);
begin
Label1.FontColor := $FFFFFF;
end;

procedure TForm2.SpeedButton1Click(Sender: TObject);
var
ControlX: single;
begin
ControlX := Self.ClientWidth - 60;

if (Panel1.Position.X = ControlX) then
begin
AnimationD.StartValue:= ControlX;
AnimationD.StopValue:= 0;

end

else begin
AnimationD.StartValue := 0;
AnimationD.StopValue := ControlX;

end;
AnimationD.Start;


end;

end.

naruto2308
14-10-2015, 17:54:13
solo estaba posicionando mal la animacion