Нужно покрамсать картинку для вэба, посоветуйте программу для этого, желательно небольшую и простенькую.

имхо бери фотошоп и не парься

Corel KnockOut

Image Ready

Нифига себе Вы насоветовали прог - человек же просил простенькую и небольшую!!!

Такую прогу можно создать самому вот кодик:

На две части:
________________________________________

Предположим, что в Picture1 - исходная картинка, а в Picture2 должна быть полученная картинка. ТогдаКод:
Sub Form_Load()
Me.ScaleMode = vbPixels
Picture1.ScaleMode = vbPixels
Picture2.ScaleMode = vbPixels
Picture1.AutoSize = True
Picture1.AutoRedraw = True
Picture2.AutoRedraw = True
Picture2.Width = 30
Picture2.Height = 60
Picture2.PaintPicture Picture1.Picture, 0, 0, 30, 60, 0, 0, 30, 60, vbSrcCopy
SavePicture Picture2.Image, "C:\File.bmp"
End Sub

RTFM, однако!
________________________________________

На несколько частей:

________________________________________

В начало процедуры:
Код:
Me.ScaleMode = vbPixels
Picture1.ScaleMode = vbPixels
Picture2.ScaleMode = vbPixels
Picture1.AutoSize = True
Picture1.AutoRedraw = True
Picture2.AutoRedraw = True
Picture2.Width = 30
Picture2.Height = 60

Далее:
Код:
Option Explicit

Private Sub Form_Load()
Dim KX As Long, KY As Long, W As Boolean, H As Boolean, X As Long, Y As Long
If Picture1.Width / 30 = Picture1.Width \ 30 Then W = True
If Picture1.Height / 60 = Picture1.Height \ 60 Then H = True
KX = Picture1.Width \ 30 + CLng(W) + 1
KY = Picture1.Height \ 60 + CLng(H) + 1
For X = 0 To KX
For Y = 0 To KY
GetAndSaveRect X * 30, Y * 60
Next
Next
End Sub

Sub GetAndSaveRect(ByVal lLeft As Long, ByVal lTop As Long)
Picture2.Cls
Picture2.PaintPicture Picture1.Picture, 0, 0, 30, 60, lLeft, lTop, 30, 60, vbSrcCopy
SavePicture Picture2.Image, "C:\MMM\" & lLeft / 30 & "-" & lTop / 60 & ".bmp"
End Sub
____________________________________

Вот и все - все просто...

Маленькую и простую программу можно найти в сети по этому поводу!
Добавлено @ 17:09
Последний кодик делит картинку на 20 частей 500*300, можно менять эти параметры...

Ну ты и любитель простых решений

На сайте: http://www.download.ru/ полно маленьких бесплатных програмулек - способных разрезать графический файл по желанию пользователя и автоматически добавить его в ШТМЛ документ...
Удачи!

Цитата

Такую прогу можно создать самому вот кодик

ProgrammerBOTANIK - а если нужно сохранить нарезанные части в формате JPG???? Просто формат BMP не очень подходит для WEB, а фотки как правило режут именно для WEB.

Это сообщение отредактировал(а) korob2001 - 31.3.2005, 07:33

А в чем проблема резки в jpg - переколбась опции загрузки и сохранения?

Кто же такие вещи на VB делает???

Только JAVA!!!

Код

import java.io.File; import javax.imageio.ImageIO; import java.awt.image.BufferedImage; public class ImageSplit {   public static void main(String[] args)   {     if(args.length < 3)     {       System.out.println("Usage: java ImageSplit <image> <#X> <#Y>");       System.exit(1);     }     try     {       String base = args[0].substring(0, args[0].lastIndexOf('.'));       String extension = args[0].substring(args[0].lastIndexOf('.'));       BufferedImage image = ImageIO.read(new File(args[0]));       int xi = (image.getWidth() / Integer.parseInt(args[1]));       int yi = (image.getHeight() / Integer.parseInt(args[2]));       int count = 0;       for(int x = 0 ; x < image.getWidth(); x += xi)       {         for(int y = 0 ; y < image.getWidth(); y += yi)         {           BufferedImage clip = image.getSubimage(x, y, xi, yi);           count++;           ImageIO.write(clip, "PNG", new File(base + count + extension));         }       }     }     catch(Exception ex)     {       System.err.println("Error processing image: " + ex);       System.exit( -1);     }   } }

Программисты, млин..... Нет бы Фотошоп открыть и сделать это за пять минут. Нет. Мы программу напишем которая за нас все нарежет

Проще, чем ImageReady всё равно не придумаете!

ProgrammerBOTANIK
А твоя програ на каком языке?

ИМХО, фотопоп рулит включаем планшет и все...

AlianceПо моему из программного кода ясно видно, что на VB 6.0

CaramelТак интереснее, твой фотошоп, простите, сколько загружается и какую машину под себя требует,а? А если нужно одинаково разрезать 20.000.000.000 картинок? (в шопе нет автоматизации таких процессов), а здесь - пару строк программного кода для выбора папки с картинками и поехали!!!

Цитата(ProgrammerBOTANIK @ 21.4.2005, 15:42)

А если нужно одинаково разрезать 20.000.000.000 картинок?

А ты чем, прости, занимаешься?