| Welcome, Guest |
You have to register before you can post on our site.
|
| Online Users |
There are currently 2089 online users. » 1 Member(s) | 2085 Guest(s) Applebot, Bing, Google, vasantiestatewinery
|
| Latest Threads |
IWDevTools
Forum: IntraWeb General Discussion
Last Post: AndreasK
10-26-2026, 01:19 PM
» Replies: 0
» Views: 68
|
SSL Revisited
Forum: IntraWeb General Discussion
Last Post: rlebeau
10-19-2026, 09:24 PM
» Replies: 3
» Views: 612
|
SpinBox Button Size
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-19-2026, 06:12 PM
» Replies: 0
» Views: 248
|
Rerendering CG Tab Contro...
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-19-2026, 05:21 PM
» Replies: 0
» Views: 232
|
CSS in CGDevTools
Forum: IntraWeb General Discussion
Last Post: MikeComb
10-13-2026, 04:12 PM
» Replies: 2
» Views: 663
|
Help with TIWPaintBox
Forum: IntraWeb General Discussion
Last Post: EmoPal
10-13-2026, 08:44 AM
» Replies: 0
» Views: 381
|
KanBan like behaviour
Forum: IntraWeb General Discussion
Last Post: MJS@mjs.us
10-06-2026, 09:31 PM
» Replies: 6
» Views: 1,434
|
TContenthandler requires ...
Forum: IntraWeb General Discussion
Last Post: valmeras
10-02-2026, 04:14 PM
» Replies: 1
» Views: 884
|
TIWSummernote Issue
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
09-30-2026, 07:34 PM
» Replies: 1
» Views: 541
|
Reproducible IIS crash in...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
09-21-2026, 05:33 PM
» Replies: 1
» Views: 918
|
|
|
| Could not compile ServerController.pas |
|
Posted by: gerieli7@gmail.com - 10-15-2018, 02:03 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
I am using Delphi 10.2 with IW 14.2.7 /
Don't know what happened when i wanted to recompile any IW program I got this error message:
[dcc32 Error] ServerController.pas(49): E2034 Too many actual parameters.
[dcc32 Fatal Error] Pr_NEW_REQI.dpr(10): F2063 Could not compile used unit 'ServerController.pas'
This error message came to me also when creating new IW app with nothing inside.
I am new to the use of intraweb and I have only one small application.
Hope to get some help here.
Thank in advance.
Eliyahu
|
|
|
| Using IdTcpClient for logging data (Lazarus/Fpc) |
|
Posted by: BosseB - 10-13-2018, 07:53 AM - Forum: Indy
- No Replies
|
 |
I need to write a small utility for receiving logging data from an embedded WiFi device.
The device (based on ESP8266) is programmed to work as a TCP<=>Serial bridge for channeling data between a data collection unit and a network connected master (can be a PC program or an Android App using TCP socket communications).
We have problems in certain operating modes with the device and so I need to check the data handled by the device. Dropped bytes is a killer here...
So I added two TCP servers to the device each listening on different ports and dedicated to log data sent to and from the serial port of the device. Every time there is any data in either of these sources it will be sent to the logging client in addition to the relaying destination.
Now I need to add two instances of a "logging client" to my configuration program (written with Lazarus/FPC and using the indylaz package components) and the plan is to do this as follows:
- Write a TCP logging class I can instantiate twice for the two logging directions
- Each class instance shall connect to the server on one of the two ports dedicated for logging
- While connected it shall wait for incoming data and dump all received bytes to a log file.
- The running count of the received bytes shall be reported to the main application for display (event function)
In order to do the above I probably need to use a threaded approach since I must keep the application live and responsive.
But I have not succeeded to find any good example to start from where the TCP client is threaded and does not send anything at all by itself, it shall just receive and write to disk whatever comes along. And generate an event with the current byte count.
Any suggestions on how this can be accomplished?
This is as far as I have come as of now:
Code: type
TRxEvent = procedure (const Buffer: TIdBytes) of object;
{ TWiFiCommLogger }
TWiFiCommLogger = class(TThread)
private
FComm: TIdTcpClient;
FServer: string;
FPort: TIdPort;
FTcpConnected: boolean;
FOnRxData: TRxEvent;
FBuffer: TIdBytes;
FActive: boolean;
procedure OnConnected(Sender: TObject);
procedure OnDisConnected(Sender: TObject);
protected
procedure Execute; override;
public
constructor Create;
destructor Destroy; override;
procedure Connect(Server: string; Port: word);
procedure Disconnect;
property Active: boolean read FActive write FActive;
property Connected: boolean read FTcpConnected;
property OnRxData: TRxEvent read FOnRxData write FOnRxData;
end;
implementation
{ TWiFiCommLogger }
procedure TWiFiCommLogger.OnConnected(Sender: TObject);
begin
FTcpConnected := true;
end;
procedure TWiFiCommLogger.OnDisConnected(Sender: TObject);
begin
FTcpConnected := false;
end;
procedure TWiFiCommLogger.Execute;
begin
while not Terminated do
begin
if FActive and FTcpConnected then
begin
//What do I put here?
FComm.IOHandler.ReadBytes(FBuffer, -1, true); //Append indata to buffer
if Length(FBuffer) > 0 then
if Assigned(FOnRxData) then
begin
FOnRxData(FBuffer); //Data are supposed to be saved in the main thread
SetLength(FBuffer, 0); //So after executing the evnt procedure, erase existing data
end;
end;
end; //while
end;
constructor TWiFiCommLogger.Create;
begin
FActive := false;
FComm := TIdTCPClient.Create(NIL);
FComm.IPVersion := Id_IPv4;
FComm.ReadTimeout := 100;
FComm.ConnectTimeout := 5000;
FTcpConnected := false;
FComm.OnConnected := OnConnected;
FComm.OnDisconnected := OnDisconnected;
end;
destructor TWiFiCommLogger.Destroy;
begin
if Connected then
Disconnect;
FComm.Free;
inherited Destroy;
end;
procedure TWiFiCommLogger.Connect(Server: string; Port: word);
begin
FServer := Server;
FPort := Port;
FComm.Connect(FServer, FPort);
end;
procedure TWiFiCommLogger.Disconnect;
begin
FComm.Disconnect;
end;
Usage in main form:
Code: procedure TfrmCommTest.FormCreate(Sender: TObject);
begin
...
FLogSS := TWiFiCommLogger.Create;
FLogSS.OnRxData := OnRxSS;
...
end;
procedure TfrmCommTest.btnStartLogClick(Sender: TObject);
begin
if (FLogSS.Connected and FLogSSM.Connected) then
begin
FLogSS.Active := false;
FLogSS.Disconnect;
ledLog.Brush.Color := clRed;
btnStartLog.Caption := 'Start Log';
end
else
begin
FLogSS.Connect(edAddress.Text, speTcpPort.Value + 10);
if FLogSS.Connected then
begin
ledLog.Brush.Color := clLime;
btnStartLog.Caption := 'Stop Log';
FLogSS.Active := true;
end;
end;
end;
procedure TfrmCommTest.OnRxSS(const Buf: TBytes);
var
len, lbuf: integer;
begin
len := Length(Buf);
lbuf := Length(FLogBufSS);
SetLength(FLogBufSS, lbuf + len);
Move(Buf[0], FLogBufSS[lbuf], len); //Append data to log buffer
SaveLogFile(Buf); //Append data to file
SetLength(Buf, 0); //Clear data after save
FSSDataRx := true;
end;
The data received (into a TIdBytes container) is sent to the main thread in the event function if defined to be stored into a file (file save not shown above).
Do I need some exception handling inside the Execute method?
|
|
|
| TIdFTP.ConnectTimeout |
|
Posted by: rhcarpenter - 10-11-2018, 01:38 AM - Forum: Indy
- Replies (3)
|
 |
I recently upgraded my Indy components to Indy v10.6.2.0.
Since installing Indy v 10.6.2.0 I am receiving the following when attempting to open a new form on which I have dropped a TIdFTP component.
ERROR: Error reading FTPClient.ConnectTimeout: Property ConnectTimeout does not exist
yet when I look in the object inspector, ConnectTimeout is a valid property set to zero.
I was told I probably have multiple Indy versions installed on my machine. How do I determine if this is the case and if so, how do I fix it?
Your help will be appreciated.
Thanks,
Randall H. Carpenter
|
|
|
| Confirm Bug in IWBootstrap |
|
Posted by: LorenSzendre - 10-10-2018, 10:32 PM - Forum: IntraWeb General Discussion
- No Replies
|
 |
Could a few of youz check IWBSCommon around line 563 and see if this isn't a massive bug:
if LT > LF then
The code is indented as if the author intended the next block to be scoped, and not just the next line.
I think there is a begin missing here.
|
|
|
| Enforce session timeout without user interaction |
|
Posted by: rchristi12 - 10-10-2018, 08:57 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
I am using Delphi 10.1 Berlin with IntraWeb 14.2.3. We have an application running as as ISAPI dll in IIS. We are using the session timeout value (15 minutes) in the Server Controller which works, however it requires user action to trigger it. In other words if the session times out and a user tries to do something they are redirected to a static html page indicating that their session has timed out and that they are required to log back in. We really need the session timeout enforced and page redirect to occur even if no user activity occurs during the timeout period. This is required for security purposes. I have tried using the TIWTimer control with the onTimer event, however I don't know how to reset it if the user takes action on the screen such as clicking buttons. It seems to start the timer when the form is first loaded. Does anyone know how to address this situation? Is there another option in IntraWeb 15? Also we have hundreds of forms so even if the timer option works it is not ideal since we would need to modify every form and add the timer functionality to it. Thanks.
|
|
|
| Session error after upgrade to 15.0.13 |
|
Posted by: Davide - 10-09-2018, 08:51 AM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
Hello,
I recompiled an ISAPI project with the new IW 15.0.13 installed.
The previous release was compiled with IW 15.0.6 or IW 15.0.7 and worked fine.
The project include the frame navigation and some controls from CGDevTools.
When I try the 15.0.13 ISAPI dll on the server I get the following error:
Error message: The IP you are using is different than the one that initiated the session.
Security check failed. Please restart the application.
In order to restart the application, please click the link below:
Click here to restart Agenti
Please note that depending on the actual exception that occured, restarting the application might not be possible. If this is the case, please report the error message to the administrator.
Error details:
Exception message : The IP you are using is different than the one that initiated the session.
Exception class : EIWSecurityException
Exception address : 0F184B76
Exception Time : 2018-10-09 10:47:11.721
------------------------------------------------------------------------------------------------------------------------
Client IP address : 217.141.31.210
Request PathInfo : /$/callback
Request Method : POST
Request User Agent : Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/69.0.3497.100 Safari/537.36
Cookies Count : 1
---------------------------------
I encountered this kind of error some yeras ago on another application.
I remeber that could be related to some properties of the server controller but I remeber which?
Could you help me to solve this problem.
Thank you,
Davide
|
|
|
| TTIWAdvWebGrid Column Header height |
|
Posted by: cpstevenc - 10-08-2018, 05:05 PM - Forum: IntraWeb General Discussion
- Replies (1)
|
 |
Old issue i've just lived with for a few years now.
Have a TTIWAdvWebGrid where the column header row is always taller than what I want it to be.
This is a 3rd party TMS control which interhits from IW controls. ( I'll post over at TMS if need be but figured ask here )
Never could quite figure it out, and this is back when I still used D7 and IW11 so its been around quite some time.
Currently using Tokyo 10.2.3 - Intraweb Ultimate Edition - 14.2.7
![[Image: f64b3f716707c54207e08ab470a00017.png]](https://i.gyazo.com/f64b3f716707c54207e08ab470a00017.png)
Here is the DFM of said grid.
Code: object grid: TTIWAdvWebGrid
Left = 18
Top = 16
Width = 695
Height = 177
ActiveRowColor = clWebRED
ActiveRowFontColor = clNone
AdvanceOnReturn = False
AutoEdit = False
AutoHTMLAdapt = False
Background.GradientDirection = gdHorizontal
Background.Gradient1 = clNone
Background.Gradient2 = clNone
Background.Picture.Stretch = False
Background.Picture.Frame = 0
Bands.Active = True
Bands.PrimaryColor = clWebLAVENDER
Bands.SecondaryColor = clWebWHEAT
Borders.Inner = ibNone
Borders.Outer = obNone
Borders.Padding = 0
Borders.Spacing = 0
Borders.Width = 0
Borders.Collapsed = True
Borders.Color = clNone
Borders.ColorDark = clNone
Borders.ColorLight = clNone
CellComment.BorderColor = 14263350
CellComment.Color = 15784080
CellComment.DisplayType = dtMouseOver
CellComment.Font.Color = 9330453
CellComment.Font.Size = 10
CellComment.Font.Style = []
CheckTruePicture.Stretch = False
CheckTruePicture.Frame = 0
CheckFalsePicture.Stretch = False
CheckFalsePicture.Frame = 0
Color = clNone
Columns = <
item
Alignment = taCenter
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderClick = False
ColumnHeaderFont.Color = clNone
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
ColumnHeaderCheckBox = True
ColumnType = ctCheckbox
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clNone
DetailFont.Size = 10
DetailFont.Style = []
Font.Color = clNone
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 10
Font.Style = []
FooterFormat = '%g'
Name = 'CheckBox'
SpinEditMaxValue = 100
SpinEditMinValue = 0
VAlign = vaBottom
Width = 4
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'PartTrim'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'Part/Trim Level'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 22
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
ColumnType = ctScroll
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'Description'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'Description'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 37
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
Alignment = taCenter
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderAlignment = taCenter
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'Side'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'Side'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 6
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
Alignment = taCenter
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderAlignment = taCenter
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'Pricing'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = '<P align="center">List $</P>'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 10
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
Alignment = taCenter
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderAlignment = taCenter
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'ID'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'ID'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 3
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
Alignment = taCenter
ButtonText = 'IMG'
ButtonWidth = 40
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderAlignment = taCenter
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
ColumnType = ctButton
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'Image'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'Image'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 8
WidthType = wtPercent
SortFormat = sfAlphabetic
end
item
Alignment = taCenter
ButtonText = 'APP'
ButtonWidth = 40
CanSort = False
CheckTrue = 'true'
CheckFalse = 'false'
ColumnHeaderAlignment = taCenter
ColumnHeaderClick = False
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 9
ColumnHeaderFont.Style = [fsBold]
ColumnType = ctButton
DefaultDynEdit = '0'
DefaultDynText = '0'
DetailFont.Color = clWebBLACK
DetailFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
DetailFont.Size = 8
DetailFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
FooterFormat = '%g'
Name = 'APP'
SpinEditMaxValue = 100
SpinEditMinValue = 0
Title = 'APP'
TitleVAlign = vaMiddle
VAlign = vaMiddle
Width = 8
WidthType = wtPercent
SortFormat = sfAlphabetic
end>
ColumnHeaderColor = clSkyBlue
ColumnHeaderFont.Color = clWebBLACK
ColumnHeaderFont.FontFamily = 'Sans-Serif, Helvetica, Arial'
ColumnHeaderFont.Size = 11
ColumnHeaderFont.Style = []
ColumnHeaderBorders.Inner = ibNone
ColumnHeaderBorders.Outer = obNone
ColumnHeaderBorders.Padding = 0
ColumnHeaderBorders.Spacing = 0
ColumnHeaderBorders.Width = 0
ColumnHeaderBorders.Collapsed = True
ColumnHeaderBorders.Color = clNone
ColumnHeaderBorders.ColorDark = clNone
ColumnHeaderBorders.ColorLight = clNone
ColumnSizing = False
Controller.Alignment = taLeftJustify
Controller.Borders.Inner = ibAll
Controller.Borders.Outer = obAll
Controller.Borders.Padding = 0
Controller.Borders.Spacing = 0
Controller.Borders.Width = 1
Controller.Borders.Collapsed = True
Controller.Borders.Color = clNone
Controller.Borders.ColorDark = clNone
Controller.Borders.ColorLight = clNone
Controller.Color = clNone
Controller.Font.Color = clNone
Controller.Font.Size = 10
Controller.Font.Style = []
Controller.Gradient1 = clNone
Controller.Gradient2 = clNone
Controller.GradientDirection = gdHorizontal
Controller.Height = 22
Controller.MaxPages = 10
Controller.Position = cpNone
Controller.Pager = cpPrevNext
Controller.PagerType = cptLink
Controller.IndicatorFormat = '%d of %d'
Controller.IndicatorType = itNone
Controller.TextPrev = 'Prev'
Controller.TextNext = 'Next'
Controller.TextFirst = 'First'
Controller.TextLast = 'Last'
Controller.ImgPrev.Stretch = False
Controller.ImgPrev.Frame = 0
Controller.ImgNext.Stretch = False
Controller.ImgNext.Frame = 0
Controller.ImgFirst.Stretch = False
Controller.ImgFirst.Frame = 0
Controller.ImgLast.Stretch = False
Controller.ImgLast.Frame = 0
Controller.RowCountSelect = False
Controller.HintFind = 'Find'
Controller.ShowPagersAlways = False
DateSeparator = '/'
DateFormat = gdEU
DecimalPoint = '.'
DefaultColumnHeaderHeight = 15
DefaultRowHeight = 22
DetailRowHeight = 0
DetailRowShow = dsNormal
EditColor = clNone
EditSelectAll = False
FooterBorders.Inner = ibAll
FooterBorders.Outer = obAll
FooterBorders.Padding = 0
FooterBorders.Spacing = 0
FooterBorders.Width = 1
FooterBorders.Collapsed = True
FooterBorders.Color = clNone
FooterBorders.ColorDark = clNone
FooterBorders.ColorLight = clNone
FooterColor = clBtnFace
FooterFont.Color = clNone
FooterFont.Size = 10
FooterFont.Style = []
Font.Color = clWebBLACK
Font.FontFamily = 'Sans-Serif, Helvetica, Arial'
Font.Size = 8
Font.Style = []
Glyphs.EditButton.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
0800000000000001000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000707E4E4E4E4
E4E4E4E4E4E4E4E4E4070707EDF609090909090909090909E4070707EDF60707
0707070707070709E4070707EDF6F6090909090909090909E4070707EDFFF609
0909095A09090909E4070707F5FF07070707075200070709E4070707F5FFFFF6
F609095A00000709E407070707FFFFFFF6F6095AFB360007E407070707FF0707
070707A4FB360007ED07070709FFFFFFFFF6F6F65BFB3600ED07070709FFFFFF
FFFFF6F6ACFB36000707070709FF070707070707F652FB360007070709FFFFFF
FFFFFFFF079A7F360007070709FFFFFFFFFFFFFF08EC51000200070709FFFFFF
FFFFFFFF07EC9A0202410707090909090909090907E407838307}
Glyphs.EditHint = 'Edit'
Glyphs.PostButton.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
0800000000000001000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0007070707071D
1D1D1D1D1D0707070707070707271E1F2727271F1E1D1D07070707071E276FB7
F6F6F6BF6F271E1D0707072727B7F6FFF6F6F6FFFFBF271E1D070727B7FFF6B7
6FBF276FF6FFBF271D07276FF6FF6F27F6FF6F1F27F6FF6F1E1D27B7FFBF6FF6
FFF6B7271F6FFFBF1F1D27B7FFB7BFFFAF6FF6672727F6F6271E67BFFFB76F6F
2727B7B72727F6F6271E6F08FFB76F6F6F676FB72727F6F6271E67BFFFF66F6F
6F6F676F6FB7FFB7271D076FF6FFBF6F6F6F6727B7F6F66F1E07076FF6F6FFF6
B7B7B7BFFFFFB7271E070707AFF6FFFFFFFFFFFFF6B7271F07070707076FBFF6
F6F6F6B76F272707070707070707076FAFAF6F67270707070707}
Glyphs.PostHint = 'Post'
Glyphs.CancelButton.Data = {
36050000424D3605000000000000360400002800000010000000100000000100
0800000000000001000000000000000000000001000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000020400000206000002080000020A0000020C0000020E000004000000040
20000040400000406000004080000040A0000040C0000040E000006000000060
20000060400000606000006080000060A0000060C0000060E000008000000080
20000080400000806000008080000080A0000080C0000080E00000A0000000A0
200000A0400000A0600000A0800000A0A00000A0C00000A0E00000C0000000C0
200000C0400000C0600000C0800000C0A00000C0C00000C0E00000E0000000E0
200000E0400000E0600000E0800000E0A00000E0C00000E0E000400000004000
20004000400040006000400080004000A0004000C0004000E000402000004020
20004020400040206000402080004020A0004020C0004020E000404000004040
20004040400040406000404080004040A0004040C0004040E000406000004060
20004060400040606000406080004060A0004060C0004060E000408000004080
20004080400040806000408080004080A0004080C0004080E00040A0000040A0
200040A0400040A0600040A0800040A0A00040A0C00040A0E00040C0000040C0
200040C0400040C0600040C0800040C0A00040C0C00040C0E00040E0000040E0
200040E0400040E0600040E0800040E0A00040E0C00040E0E000800000008000
20008000400080006000800080008000A0008000C0008000E000802000008020
20008020400080206000802080008020A0008020C0008020E000804000008040
20008040400080406000804080008040A0008040C0008040E000806000008060
20008060400080606000806080008060A0008060C0008060E000808000008080
20008080400080806000808080008080A0008080C0008080E00080A0000080A0
200080A0400080A0600080A0800080A0A00080A0C00080A0E00080C0000080C0
200080C0400080C0600080C0800080C0A00080C0C00080C0E00080E0000080E0
200080E0400080E0600080E0800080E0A00080E0C00080E0E000C0000000C000
2000C0004000C0006000C0008000C000A000C000C000C000E000C0200000C020
2000C0204000C0206000C0208000C020A000C020C000C020E000C0400000C040
2000C0404000C0406000C0408000C040A000C040C000C040E000C0600000C060
2000C0604000C0606000C0608000C060A000C060C000C060E000C0800000C080
2000C0804000C0806000C0808000C080A000C080C000C080E000C0A00000C0A0
2000C0A04000C0A06000C0A08000C0A0A000C0A0C000C0A0E000C0C00000C0C0
2000C0C04000C0C06000C0C08000C0C0A000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0007070707071D
1D1D1D1D1D0707070707070707271E1F2727271F1E1D1D07070707071E276FB7
F6F6F6BF6F271E1D0707072727B7F6FFF6F6F6FFFFBF271E1D070727B7FFF627
27271F1FB7F6BF271D07276FF6FFB7B767272727B7B7FF6F1E1D27B7FFBF67B7
F66767F6B727F6BF1F1D27B7FF6F6F67B7F6F6B72727BFF6271E67BFFF6F6F6F
6FF6F66F2727B7F6271E6F08FF6F6F6FF6B7B7F66F27F6F6271E67BFFFF66FF6
B76F6FB7F66FF6B7271D076FF6FFB7AF6F6F6F6FB7F6F66F1E07076FF6F6FFF6
6F6F6FB7FFFFB7271E070707AFF6FFFFFFFFFFFFF6B7271F07070707076FBFF6
F6F6F6B76F272707070707070707076FAFAF6F67270707070707}
Glyphs.CancelHint = 'Cancel'
Glyphs.SpinEditButtonDownImage.Stretch = False
Glyphs.SpinEditButtonDownImage.Frame = 0
Glyphs.SpinEditButtonUpImage.Stretch = False
Glyphs.SpinEditButtonUpImage.Frame = 0
HoverColor = clNone
HoverFontColor = clNone
HeaderStyle = hsFlat
ID = 0
Indicators.Browse.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888880888888888888888008888888888888800088888
8888888800008888888888880000088888888888000000888888888800000008
8888888800000088888888880000088888888888000088888888888800088888
8888888800888888888888880888888888888888888888888888}
Indicators.Insert.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888888888888888888088888
8888888888088888888888800808008888888888800088888888888880008888
8888888008080088888888888808888888888888880888888888888888888888
8888888888888888888888888888888888888888888888888888}
Indicators.Edit.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888880080088888888888880888888
8888888880888888888888888088888888888888808888888888888880888888
8888888880888888888888888088888888888888808888888888888880888888
8888888008008888888888888888888888888888888888888888}
MouseSelect = msSingleCell
Nodes.NodeOpen.Stretch = False
Nodes.NodeOpen.Frame = 1
Nodes.NodeOpen.Data = {
424DBE0000000000000076000000280000000900000009000000010004000000
000048000000120B0000120B0000100000001000000000000000000080000080
00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000FFF
FFFF000000000FFF0FFF000000000FFF0FFF000000000F00000F000000000FFF
0FFF000000000FFF0FFF000000000FFFFFFF000000000000000000000000}
Nodes.NodeClosed.Stretch = False
Nodes.NodeClosed.Frame = 1
Nodes.NodeClosed.Data = {
424DBE0000000000000076000000280000000900000009000000010004000000
000048000000120B0000120B0000100000001000000000000000000080000080
00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000FFF
FFFF000000000FFFFFFF000000000FFFFFFF000000000F00000F000000000FFF
FFFF000000000FFFFFFF000000000FFFFFFF000000000000000000000000}
NameOfDays.Strings = (
'Sun'
'Mon'
'Tue'
'Wed'
'Thu'
'Fri'
'Sat')
NameOfMonths.Strings = (
'January'
'February'
'March'
'April'
'May'
'June'
'July'
'August'
'September'
'October'
'November'
'December')
OuterBorder.Show = False
OuterBorder.Color = 1
Page = 0
RowCount = 3
RowHeader.Show = False
RowHeader.Width = 22
RowHeader.Borders.Inner = ibAll
RowHeader.Borders.Outer = obAll
RowHeader.Borders.Padding = 0
RowHeader.Borders.Spacing = 0
RowHeader.Borders.Width = 1
RowHeader.Borders.Collapsed = True
RowHeader.Borders.Color = clNone
RowHeader.Borders.ColorDark = clNone
RowHeader.Borders.ColorLight = clNone
RowHeader.Color = clBtnFace
RowHeader.Gradient1 = clNone
RowHeader.Gradient2 = clNone
RowHeader.GradientDirection = gdHorizontal
Scroll.Style = scNever
Scroll.Scrollbar3DLightColor = clNone
Scroll.ScrollbarArrowColor = clNone
Scroll.ScrollbarBaseColor = clNone
Scroll.ScrollbarTrackColor = clNone
Scroll.ScrollbarDarkshadowColor = clNone
Scroll.ScrollbarFaceColor = clNone
Scroll.ScrollbarHighlightColor = clNone
Scroll.ScrollbarShadowColor = clNone
SelectColor = clHighlight
SelectFontColor = clHighlightText
ShowColumnHeader = True
ShowFooter = False
ShowSelect = False
SortSettings.Show = False
SortSettings.Column = 0
SortSettings.Direction = sdAscending
SortSettings.InitSortDir = sdAscending
StretchColumn = -1
TabOrder = 0
UseFullHeight = True
UseFullWidth = True
AsyncActiveRowMove = False
AsyncEdit = False
AsyncPaging = False
AsyncSorting = False
ActiveRow = -1
AlwaysEdit = False
TotalRows = 10
end
|
|
|
| Bootstrap V4 Framework |
|
Posted by: ShaneStump - 10-08-2018, 03:08 PM - Forum: IntraWeb General Discussion
- Replies (2)
|
 |
Howdy All!
This weekend i finally spent the time evaluating Bootstrap for IW. I can see why everyone who chooses to use it would prefer it over other IW UI offerings.
Well, I hit a brick wall after I started reading about all the changes in Bootstrap V4 which would affect me. I really would rather base V3 of my upcoming IW web reservation system on BS 4.
Any how, a fellow IW user, Loren Szendre, helped me quite a bit and is very knowledgeable about IW + Bootstrap 4.
He commented that he might have to do an IW Bootstrap 4 framework himself. I told him to setup a GoFund page and I would contribute as this kind of framework would be invaluable to me as a commercial one man shop.
If any of you would like to see this done also, please contribute to Loren.
The GoFund page link is below:
GoFund for IW Bootstrap Components
All the best,
Shane
|
|
|
|