GdPicture FORUMS

[manyounoi]

I've a question of GdPicture Pro Imaging, when I modified image but I want to undo or redo that modification , what should I do ?

[Loïc]

Hi,

You need to use the CreateClonedImage() method to do that.

I give you a simple way to performs 1 level Undo / Redo operation:

Code: Select all

Dim nMainImage As Long
Dim nImageUndo1 As Long
Dim nImageUndo2 As Long

nMainImage = Imaging1.CreateImageFromFile("c:\dest.tif")
nImageUndo1 = Imaging1.CreateClonedImage(nMainImage)
Imaging1.SetNativeImage (nImageUndo)
Call Imaging1.DrawText("DummyText", 50, 50, 10)

'Here we want to performs Undo operation

Imaging1.SetNativeImage (nMainImage)
nImageUndo2 = Imaging1.CreateClonedImage(nMainImage)
Imaging1.SetNativeImage (nImageUndo2)

Call Imaging1.DrawText("DummyText2", 50, 50, 10)

'Here we want to performs Redo operation
Imaging1.SetNativeImage (nImageUndo1)
Imaging1.CloseImage (nImageUndo2)

Best regards,

Loïc

[manyounoi]

Thank you