Перейти к содержанию
Fire Monkey от А до Я

Emma

Пользователи
  • Постов

    11
  • Зарегистрирован

  • Посещение

Весь контент Emma

  1. Добрый день! Тут задумалась над вопросом, даже не знаю, как описать... Попробую так: возможно ли, дочернюю форму VCL проекта, в значительной степени облегчить? Так как она, переназначена для того, чтобы график показывался в отдельном окне, а вся работа с графиком, идет из основной формы. Показ в дочернем окне, позволяет поставить Align:=client и не занимет место на основной форме, там лишь ссылка на график.
  2. как вертикальную ось подписать?
  3. Проблема решена. метод Series.AddXY(strtofloat(Edit1.Text),strtofloat(Edit2.Text)); а не Series.AddX(strtofloat(Edit1.Text),strtofloat(Edit2.Text)); Series.AddY(strtofloat(Edit1.Text),strtofloat(Edit2.Text));
  4. Формы две: одна основная вторая дочерняя на дочерней компонет TChart задача понажатию кноки добавлять точки из эдитов. Из эдит 1 добавлять по х из эдит 2 по Y. Видимой делаеться только форма на которой расположен TChart. Сам TChart своей видимости не меняет. кнопка Series create создает серию, а Addpointgraphic добавляет из эдитов точки в серию. те нужно нажать 1.Series create 2.Addpointgraphic иначе стработает не верно кнопка AddPoint задает серию из 4-х расчитанных значений потму началанужнорачить зачения тогда порядок нажатия измениться 1.K1calculete 2.Series create 3.AddPoint 4.Addpointgraphic Ошибка была змечена при постороении рачситанной серии.
  5. Emma

    Tchart дает лишние значения

    Кроме того, что положено, добавляет свои значения как избавиться от этого
  6. Emma

    Форма и её скролирование

    Добрый день! Раньше, просто ставила за форму компонент, форма удлинялась, при Autoscroll :=true. Сейчас такого нет. Пытаюсь создать форму, как вердовский файл, которую можно скролить. Как сделать, чтобы можно было выставить компоненты, за размерами формы, а потом просто скролить форму по длине.
  7. Проблема решена, указатель, показывал не в ту степь: проблема была не в инициалиазации, а в модуле uses первой формы, где содержалось указание на старое название.
  8. вот инициализация модуля 2 program al; uses System.StartUpCopy, FMX.Forms, Userlarmforn in 'Userlarmforn.pas' {Form1}, other in 'other.pas' {Form2}; {$R *.res} begin Application.Initialize; Application.CreateForm(TForm1, Form1); Application.CreateForm(TForm2, Form2); Application.Run; end. он выделяет вот эту строку other in 'other.pas' {Form2}; Как возможно исправить
  9. Добрый вечер! Неполучаеться создать динамически обект series Пробовала так: Var MySeries : TLineSeries ; MySeries := TLineSeries.Create( Self ); MySeries.ParentChart := Chart1 ; Когдаделаю так то первый момент работает после сохрания unit other; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMXTee.Engine, FMXTee.Procs, FMXTee.Chart, FMX.Edit, FMX.StdCtrls, FMX.Controls.Presentation, FMXTee.Series; type TForm2 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton; Label1: TLabel; Edit1: TEdit; Chart1: TChart; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form2: TForm2; H,n,f:integer; Series:TLineSeries; implementation {$R *.fmx} procedure TForm2.Button1Click(Sender: TObject); begin H:=H+1; n:=strtoint(edit1.Text); F:=System.Random(n); label1.Text:=inttostr(F); randomize; Series.AddX(H); Series.AddY(F); end; procedure TForm2.Button2Click(Sender: TObject); begin Series:=TLineSeries.Create(self); Series.Name:='Series1'; Series.ParentChart:=Chart1; Series.Title:='Line'; Chart1.View3D:=false end; procedure TForm2.Button3Click(Sender: TObject); begin Chart1.ClearChart; end; end. ошибка которю выдает: [dcc32 Fatal Error] al.dpr(7): F2613 Unit 'Unit2' not found. al.dpr(7): Unit 'Unit2' is used by 'Userlarmforn' и показывает на инициализацию формы
×
×
  • Создать...