ааа помогите

Тема в разделе "Pascal and Delphi", создана пользователем JayD, 13 сен 2009.

Наш партнер Genesis Hackspace
  1. JayD

    JayD Гость

    у меня после нажатия кнопки создаются label(их количество опредиляется количеством item в combobox или можно количеством линий в мемо))) потом я нажимаю на любой из label и он присваевает edit1.text тот текст каторий в линии мемо нумеруется так же как и label(допустим нажав label3 выбирается 3-я строка в мемо) пожалуйста пишите все что можете ))не могу зделать аш башня кипит))
    уже4 час в нети вишу и нечего))) надежда токо на вас!!!

    Добавлено через 2 минуты
    вот если что код(s уже описана как интеджер):\

    procedure TForm1.c(offset: integer);
    var edit: tlabel;
    begin
    edit := tlabel.Create(form1);
    edit.Parent := scrollbox1;
    edit.Left:= 20;
    edit.Top := 30 * offset;
    edit.Visible := true;
    edit.Name := 'Labe'+inttostr(offset);
    edit.Caption:= 'сообщение'+ inttostr(offset);
    edit.OnClick:=Label1click;
    end;

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    c(z);
    z:=z+1;
    end;
     
Загрузка...
Похожие Темы - ааа помогите
  1. Makc
    Ответов:
    4
    Просмотров:
    99
  2. Sniff
    Ответов:
    1
    Просмотров:
    96
  3. 777
    Ответов:
    2
    Просмотров:
    89
  4. (((_CYBORG_)))
    Ответов:
    9
    Просмотров:
    245
  5. Heavy10110
    Ответов:
    10
    Просмотров:
    292

Поделиться этой страницей