Как TLabel переместить поверх картинки?

@ENERGY · Регистрация: 18.10.2009

Author24 — интернет-сервис помощи студентам

суть программы такова:
тест. есть картинка с изображением мускулатуры на пол окна и есть цифры ( 1 до 23 ), с названиями мышц.
надо что б накладывались цифры на мишци и при правильном соответствии засчитовало правильный ответ

начал писать выбивает ошибку вот тут:

Delphi

procedure TForm1.Shape1MouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
flag:=False;
end;

не хочет читать flag, это я отрыл в книге от училы.

буду рад любой помощи тк вопросов куча, а сделать мало что пока могу...

Добавлено через 10 минут
вопрос с ошибкой отпал.

не отпал вопрос в том как зделать так что б, допустим Лэйбл1, должен был прикреплятся в конкретному месту

@Ztrel · 23.12.2009, 22:17

Ну поставь его, куда тебе нужно на форме, там он у тебя и останется...

@ENERGY · 23.12.2009, 22:30 **[ТС]**

так мне надо что б человек проходящий тест сам поставил его в нужное место, например, на изоброжение бицепса поместил №1 (бицепс), и если правильно то засчитало б

@*~<`PIK`>~* · 23.12.2009, 23:18

сделай ето по другому поставь на картинку лабелы с цифрами а рядом с картинкой едиты чтоб тот кто проходит тест писал в едиты цыфры с картинки.

@ENERGY · 25.12.2009, 17:41 **[ТС]**

мне вот подсказали что б я нарисовал маску-картинку и разных цветов на которой вся мышца №1 закрашена цветом, скажем, rgb(1,0,0), мышца №2 - rgb(2,0,0) и т.д. Пусть называется MaskImage;
поставить теги
и дали код проверки:

Delphi

for i:=0 to form1.componentsCount-1 do
  if form1.components[i] is TLabel then
  begin
     with (Form1.Components[i] as TLabel) do
     begin
        x:=Left;
        y:=Top;
        num:=Tag;
     end;
     if MaskImage.Pixels[x,y]=rgb(num, 0,0)
        then showmessage('Метка '+inttostr(num)+' размещена корректно!');
  end;

но я не могу понять что это за картинка такая

@Ztrel 508 / 227 / 42 Регистрация: 14.11.2009 Сообщений: 371
	23.12.2009, 22:17	2
	Ну поставь его, куда тебе нужно на форме, там он у тебя и останется... 0

@ENERGY 0 / 0 / 0 Регистрация: 18.10.2009 Сообщений: 4
	23.12.2009, 22:30 [ТС]	3
	так мне надо что б человек проходящий тест сам поставил его в нужное место, например, на изоброжение бицепса поместил №1 (бицепс), и если правильно то засчитало б 0

@~<`PIK`>~ ﻌﺹ ﺦ ﺖﻀ ﺹ ﻙ ﺵﻔ ﺊ ﺘﺝ 607 / 387 / 81 Регистрация: 15.12.2009 Сообщений: 753
	23.12.2009, 23:18	4
	сделай ето по другому поставь на картинку лабелы с цифрами а рядом с картинкой едиты чтоб тот кто проходит тест писал в едиты цыфры с картинки. 0

	25.12.2009, 17:41

Опции темы