Работа с потоками в delphi

[Zubastic]

G1ta0, ок, спасибо.

[Zubastic]

Пожалуй апну темку. Сейчас тема немного другая:
есть TChart. У него есть метод Chart.SaveToBitmap. Но я хочу сохранять не на диск, а в стрим, для преобразования в jpg или прямую передачу на другой компьютер. Вопрос: как это сделать?

[Hint]

Сообщение от Zubastic

Пожалуй апну темку. Сейчас тема немного другая:
есть TChart. У него есть метод Chart.SaveToBitmap. Но я хочу сохранять не на диск, а в стрим, для преобразования в jpg или прямую передачу на другой компьютер. Вопрос: как это сделать?

procedure TForm1.Button1Click(Sender: TObject);
var
  bmp: TBitmap;
begin
  bmp := TBitmap.Create;
  try
    bmp.Width := Chart1.Width;
    bmp.Height := Chart1.Height;
    Chart1.Draw(bmp.Canvas, Rect(0, 0, bmp.Width, bmp.Height));
    bmp.SaveToFile('chart.bmp');
  finally
    bmp.Free;
  end;
end;

Вместо SaveToFile делаешь что-то свое.

[Zubastic]

удалено расрасрас

[Zubastic]

Такой вопрос: есть поток, внутри потока есть есть выбор какую процедуру запускать (передается при создании процедуры), однако нельзя запустить несколько потоков с разными параметрами (выдается ошибка). Как лучше сделать?

Добавлено через 5 часов 47 минут
Сделать несколько разных потоков состоящих из идентичных параметров или как?

[BigSnake]

лучше приложить к сообщению свой код и текст ошибки , чтобы не гадать на кофейной гуще

[Zubastic]

У меня идет запуск одного и того же потока 3 раза. Внутри запуск процедуры в зависимости от числа, передаваемого в поток.


Добавлено через 10 минут
Сделал 3 потока разных, но ихмо это изврат, можно как-то красивее сделать.

Добавлено через 10 часов 0 минут
В 3 потока такая же борода...

Добавлено через 21 час 58 минут
Вообщем от чего это зависит - хз. Как делать много много потоков?

[BigSnake]

еще раз повторюсь без вашего кода тут трудно о чем-то говорить, такие ошибки обычно когда вы из потока обращаетесь к потоконезащищенным обьектам , VCL визуальным компонентам например .

хотите понять работу с потоками в delphi почитайте этот перевод http://forum.vingrad.ru/topic-60076.html

[Zubastic]

Видел. Честно прочитал 2 главы и бросил, я больше по примерам.
Вообщем разобрался в чем дело: 2 процедуры одновременно обращались к объекту соответственно вызывая ошибку.

[Hint]

Сообщение от Zubastic

Видел. Честно прочитал 2 главы и бросил, я больше по примерам.
Вообщем разобрался в чем дело: 2 процедуры одновременно обращались к объекту соответственно вызывая ошибку.

Из потоков нельзя просто так вызывать функции VCL. И нельзя просто так обращаться ко внешним данным (или вызывать функции, которые используют внешние данные). Все должно быть синхронизировано: или с использованием блокировок, или с посылкой сообщений в основной поток (который в свою очередь уже будет работать с общими данными).