# Gambas Form File 3.0
{ Form Form
MoveScaled(0,0,64,59)
Text = ("Rename all pictures")
Resizable = False
{ Panel1 Panel
MoveScaled(2,21,60,22)
Border = Border.Sunken
{ txtPre TextBox
MoveScaled(24,2,35,4)
}
{ SpinBox1 SpinBox
MoveScaled(24,7,6,4)
MinValue = 1
MaxValue = 5
}
{ txtStart TextBox
MoveScaled(24,12,10,4)
Text = ("1")
MaxLength = 5
}
{ CheckFile CheckBox
MoveScaled(2,17,55,3)
Text = ("Keep original filename as suffix")
Value = CheckBox.True
}
{ Label2 Label
MoveScaled(2,7,22,4)
Text = ("Number format")
}
{ Label3 Label
MoveScaled(31,7,13,4)
Text = ("digits")
}
{ Label5 Label
MoveScaled(2,2,22,4)
Text = ("Prefix")
}
{ Label6 Label
MoveScaled(2,12,22,4)
Text = ("Start value")
}
}
{ btnOK Button
MoveScaled(46,53,16,4)
Text = ("&OK")
Default = True
}
{ btnCancel Button
MoveScaled(28,53,16,4)
Text = ("&Cancel")
Cancel = True
}
{ TextLabel1 TextLabel
MoveScaled(2,2,60,14)
Background = &HFFFCCC&
Padding = 7
Text = ("This function will rename all .jp(e)g files in the directory and add serial numbers to the filenames.
The pictures will be handled in the order they are shown right now, in rows from left to right, rows from top to bottom.")
Border = Border.Etched
}
{ Label1 Label
MoveScaled(2,18,19,3)
Text = ("Options")
}
{ Label4 Label
MoveScaled(2,46,11,4)
Text = ("Example:")
}
{ lblExample Label
MoveScaled(13,46,49,4)
Font = Font["Bold"]
Background = Color.TextBackground
Alignment = Align.Center
Border = Border.Etched
}
}