Delphi6 Как получить одну плитку паттерна в натуральную величину 0) Создать новый документ с размерами, заведомо большими одной плитки нужного паттерна.
1) Создать новый слой Layer 1, залить его нужным паттерном (Edit--Fill : Contents : Use: Pattern : Custom Pattern: <паттерн>).
2) Создать 2 копии слоя:
Layer 1 copy и
Layer 1 copy 2 (Layer--Duplicate Layer).
3) Слой
Layer 1 copy 2 сделать невидимым, а слою
Layer 1 copy задать режим наложения Difference. При этом всё станет чёрным.
4) Сдвигать слой
Layer 1 copy вправо до тех пор, пока слева не останется одна полоска с паттерном, а справа будет абсолютная чернота.
5) Сделать видимым слой
Layer 1 copy 2, задать ему режим наложения также Difference (оба дубликата основого слоя
Layer 1 будут иметь режим наложения Difference), и сдвигать его вниз до тех пор, пока сверху справа не станет полная чернота, а в левом верхнем углу будет одна плитка паттерна.
http://img207.imageshack.us/img207/9299/ps2patternhl7.gif 6) Свести слои (Layer--Flatten Image).
7) Сделать выделение плитки в левом углу, и обрезать изображения (Image--Crop).
В результате получится одна плитка паттерна, что и требовалось получить.
А как вы представляете это процесс?
