| Welcome, Guest |
You have to register before you can post on our site.
|
| Forum Statistics |
» Members: 88,098
» Latest member: llwinltd
» Forum threads: 2,414
» Forum posts: 11,339
Full Statistics
|
| Online Users |
There are currently 1297 online users.
» 2 Member(s) | 1292 Guest(s)
Bing, Google, Yandex, megatk666com, ramikaseo
|
| Latest Threads |
Intraweb components missi...
Forum: IntraWeb General Discussion
Last Post: valmeras
07-24-2026, 12:43 PM
» Replies: 1
» Views: 119
|
Image question on tiwjqdb...
Forum: IntraWeb General Discussion
Last Post: alex.trejo@tttnet.com.mx
07-17-2026, 05:18 PM
» Replies: 6
» Views: 4,664
|
IW 16.1.9 Invalid propert...
Forum: IntraWeb General Discussion
Last Post: Blanca80
07-17-2026, 08:06 AM
» Replies: 7
» Views: 2,188
|
Bootstrap5
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 03:38 AM
» Replies: 2
» Views: 605
|
CSS file not reloading af...
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 03:14 AM
» Replies: 1
» Views: 242
|
Need Help Integrating Mic...
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 02:38 AM
» Replies: 1
» Views: 242
|
Projeto Intraweb
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 02:12 AM
» Replies: 1
» Views: 350
|
TIWjQDBGrid erratic behav...
Forum: IntraWeb General Discussion
Last Post: Alexandre Machado
07-17-2026, 02:11 AM
» Replies: 7
» Views: 1,131
|
OpenSSL and concurrent re...
Forum: Indy
Last Post: kbriggs
07-05-2026, 02:41 PM
» Replies: 5
» Views: 666
|
Intraweb + Lazarus
Forum: IntraWeb Dúvidas Gerais
Last Post: vonirpereira
07-03-2026, 06:35 PM
» Replies: 0
» Views: 152
|
|
|
| TIWImage and EXIF tag |
|
Posted by: valmeras - 06-19-2020, 07:48 PM - Forum: IntraWeb General Discussion
- Replies (5)
|
 |
I am using Intraweb 14.2.7 with C++ Builder Rad Studio 10.2.3
I have noticed a problem with the display of pictures in TIWImage specially with mobile devices.
When I upload a picture into TIWImage, it seems vertical as expected. But when I try to rotate it, it appears that in fact it was rotated -90 degrees.
It seems that the problem is related to pictures EXIF tag.
So, is there a parameter to setup with TIWImage so that it will upload all pictures vertically despite the EXIF tag ?
|
|
|
| Options to Deploy IW 15 apps |
|
Posted by: FAlvarado - 06-19-2020, 05:08 PM - Forum: IntraWeb General Discussion
- Replies (7)
|
 |
Hi All!
I used to develop a couple of IW 14 web apps in the past. They were deployed as Windows Services in an intranet, so no problem at all. Now, I'm evaluating the development of a IW 15 application hosted by a external service (like GoDaddy in Mexico). This application will use database (SQL-Server or MySQL)
My questions are:
What is the recommended option to use (stand alone, http.sys, service...) for a hosted IW application developed with IW 15?
What should I look for (or ask for) before purchasing a plan in the hosting service?
Is it possible to develop as a Windows Service and then change it to stand alone or http.sys?
Best Regards
Francisco Alvarado
|
|
|
|
| Intraweb under load |
|
Posted by: reallyethical - 06-19-2020, 02:41 PM - Forum: IntraWeb General Discussion
- Replies (2)
|
|
We are looking at Intraweb and considering it for a Web App that will have around 1000 users per hour.
This will be to complete simple forms with validation and AJAX callbacks on some checkboxes for validation and flow.
The question is:
Can Intraweb native server as a windows service cope with significant usage
I have seen elsewhere people say that the Intraweb standalone server is not really for deployment but that is contradicted by the release notes.
Please let me know your opinions, if it is not the right solution then I am happy to look at other options.
Thank you all for your help and assistance in advance.
|
|
|
|
| Strange (unexpected) OnAsyncExit behavior |
|
Posted by: SorenJensen - 06-19-2020, 01:05 PM - Forum: IntraWeb General Discussion
- Replies (5)
|
|
Hi All,
I'm experiencing a strange (read: unexpected) behavior using an IWEdits OnAsyncExit procedure, and it easy to recreate in a really simple test:
Create a simple form with two IWdit components, IWEdit1 and IWEdit2, having taborder 0 and 1.
Use the FormShow event to IWEdit1.SetFocus.
Add the following line to the IWEdit1.OnAsyncExit event:
If IWEdit1.Text = 'AA' then IWEdit2.Text := 'BB';
Run the program and press tab when IWEdit1 has focus. The Text property of IWEdit2 is correctly selected.
Now, jump back to IWEdit1 and enter AA and press tab again.
Correctly the contents of IWEdit2.Text is set to BB, BUT instead of having BB as a selected text, it is not selected and the cursor is placed after the text.
Again, jump back to IWEdit1, still containing AA, and press TAB again.
Now IWEdit2 still has BB as contents, but it is selected as it should be.
It is ONLY wrong, when the contents of the text is changed AND the focus is shifted to the component at the same time.
Anybody know why and how I can avoid this ?
Further test: if I add another IWEdit (or other tababel component) in between IWEdit1 and IWEdit2,changing the tab order accordingly, the problem goes away and everything is as expected.
So: the problem is only when the contents of the IwEdit component being jumped to, is changed by the onasyncexit procedure of the Iwedit being jumped from. I suspect it has something to do with the order in which the events, OnExit, OnChange and OnEnter, is handled, but I admit I'm only guessing.
NB! I'm still on 10.3.2 with updates and 15.1.17.
|
|
|
|
| TIdTCPClient on Android: Can't catch Exception Popup - Socket Error #107 |
|
Posted by: Peter_WB - 06-18-2020, 09:25 AM - Forum: Indy
- Replies (4)
|
|
In our Application we offer connect to our server by in 2 ways - by URL (when we are in LTE network) or direct by IP (when we are in same WLAN network as the server).
The app tried to connect the URL first, an when not available (EIdSocketError occours) then we try to connect by direct IP address. On IOS this is working perfect.
On Android, the Indy 10 pop up with a Message Box 'Socket Error 107' when we try to connect to an URL which is not available yet.
We are not able to catch the exception in our code, so our app is not able to handle this.
How can we get the Socket Error 107 instead a popup to the user ??
Here are the relevant code segments. Thanks in advance.
Code: private
{ Private declarations }
FClient: TIdTCPClient;
// -----------------------------------------------------------------------------
// Erzeugen
constructor TAppComThread.Create(OnMsgEvent: TComEvent);
begin
FClient := TIdTCPClient.Create(nil);
FClient.OnStatus := OnStatus;
FClient.OnConnected := OnConnected;
FClient.ConnectTimeout := c_TcpConnectTimeout;
FClient.ReadTimeout := c_TcpReadTimeout;
end;
//------------------------------------------------------------------------------
// Ausführen
procedure TAppComThread.Execute;
var
begin
while not Terminated do
begin
Sleep(10);
// Connect now
if bConnectFlag then
begin
bConnectFlag := false;
Try
FClient.Port := c_TcpPortPersonen;
FClient.Connect;
Except
On E: EIdSocketError Do
begin
bConnectionFailed := true;
ReplyMessage('167: No Socket at '+ FClient.Host);
end;
On E: Exception Do
begin
bConnectionFailed := true;
ReplyMessage('172: No Connection to '+ FClient.Host);
end;
End;
end;
end;
end;
|
|
|
|
| IdTcpServer Kick Client (Disconnect) INVALID HANDLE Exception |
|
Posted by: 3ddark - 06-17-2020, 05:58 PM - Forum: Indy
- Replies (3)
|
 |
Hello everybody,
I have a TCP Server application as ConsoleApp. Sometimes i need Disconnect to some client/s. I use like this code in main loop.
But I get an error after Disconnect ----> INVALID HANDLE
I gues(probally) after disconnect then lost thread handle.
How to solve this issue
Code: var
LList: TList;
n1: Integer;
begin
while True do
begin
Sleep(1);
LList := IdTCPServer1.Contexts.LockList;
try
for n1 := 0 to LList.Count-1 do
if TIdContext(LList[n1]).IsKickedClient then
TIdContext(LList[n1]).Connection.Disconnect;
finally
IdTCPServer1.Contexts.UnlockList;
LList := nil;
end;
end;
end;
|
|
|
|
| upload image with php file |
|
Posted by: Madammar - 06-17-2020, 05:05 PM - Forum: Delphi General Discussion
- Replies (2)
|
|
i have this uploading php script
Code: <?php
/* Check if file already exists in location file save */
$fdirectory = "uploads/";
if (!file_exists($fdirectory)) {
die('You Need To Create uploads Folder before start uploading..<br> <b>Dont Forget To Give Premission 777 To the Folder</b>');
}
if (isset($_POST['upload'])) {
$imgsize = $_FILES['image']['size'];
$image_name = $_FILES['image']['name'];
$image_tempname = $_FILES['image']['tmp_name'];
$image_type = getimagesize($image_tempname);
$image_ext = explode('.',$image_name);
$ext = strtolower(end($image_ext));
$FileError = $_FILES['image']['error'];
$allow_ext = array('png','jpg','gif','jpeg','bmp');
$allow_type = array('image/png','image/gif','image/jpeg','image/bmp');
if (in_array($ext, $allow_ext) && in_array($image_type['mime'], $allow_type)) {
if ($FileError === 0) {
if ($imgsize < 300000) {
list($width, $height, $mime) = $image_type;
if ($width>0 && $height>0) {
#do Upload
$NewImageName = uniqid('', true).".".$ext;
$moveImg = $fdirectory.$NewImageName;
$upload = move_uploaded_file($image_tempname, $moveImg);
if ($upload) {
header("Location: imgup.php?img=".$moveImg ."");
exit;
} else {
header("Location: imgup.php?res=failed");
exit;
} # end check if uploaded
} else {
header("Location: imgup.php?res=error");
exit;
}# image width check
} else {
header("Location: imgup.php?res=large");
exit;
} # File size check end
} else {#FileError
header("Location: imgup.php?res=error");
exit;
}
} else { # end of sec check
header("Location: imgup.php?res=error");
exit;
}
/* isset check end*/
}
?>
and i am using httpclient to post the file to php like following
Code: HttpClient := THTTPClient.Create;
try
HttpClient.AllowCookies := True;
HttpClient.UserAgent := sUserAgent;
HttpClient.HandleRedirects := True;
HttpClient.MaxRedirects := 3;
HTTPClient.ConnectionTimeout := 0;
HTTPClient.ResponseTimeout := 0;
PostData := TIdMultipartFormDataStream.Create;
try
try
PostData.AddFile('image', FFileToUpload);
HttpResponse := HttpClient.Post(FdataURL, PostData);
FoutData := HttpResponse.ContentAsString();
except
end;
finally
PostData.Free;
end;
finally
HttpClient.Free;
end;
but the image doesnt seems to get uploaded and i get an empty response
what i am doing wrong ?
in html it works fine
Code: <form action="upload.php" method="post" enctype="multipart/form-data">
<div class="form-group file-area">
<input type="file" accept="image/*" name="image" id="images">
</div>
<div class="form-group">
<button type="submit" name="upload">Upload image</button>
</div>
</form>
|
|
|
|
|
