I have installed the latest Delphi 10.2. and after programming and adding a couple of units, I save the program and log back into the application the next day and my main program file has been wiped clean... my unit files are intact. This has happened to me three times. Has anyone else had this issue? Thanks
↧
main progam file gets deleted
↧
10.2 Debugger not showing values of variables
By hovering over a variable in a breakpoint the debugger shows me the same as in design-time.
What I'd like to see is the value of the variable as in preceding versions. Is this a bug or a setting I have to configure?
(by explicitly asking for it with Ctrl F7 I get the value)
↧
↧
Unlink static library, linker64 -unable to open file
Hi there,
compiling my 64bit project, I get a linker error -'unable to open file' from .lib file. The file is there and the folder included in the project.
I reckon it might be a corrupt .ilb file, so I want to get it out from my project. How do I find out, which file or unit refers to it?
The library is "pvdevice64.lib" by pleoras EBUS SDK.
Thanks!!
René
↧
bds.exe does not terminate and stays running
upgraded to 10.2.2 and bds.exe does not terminate when you exit ide.
↧
Amazon s3 getbucket not working
I have a small command line application to upload/download/list items in S3 buckets until X7 everything worked just fine However, in 10.2, with exactly the same authentication, it works for upload/download but not for listing (getbucket) TAmazonStorageService returns "Forbidden - The request signature we calculated does not match the signature you provided. Check your key and signing method. (SignatureDoesNotMatch)Date=Wed, 03 Jan 2018 19:55:38 GMT" however the Key and the User are exsactly the same that are accepted when uploading/downloading what is going on? here is my code:
program AwsCL;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils,
System.Classes,
Data.Cloud.CloudAPI,
Data.Cloud.AmazonAPI,
utilities in '..\..\del_files\utilities.pas',
ConfigUnit in '..\ALM\ConfigUnit.pas';
var
AmazonConnectionInfo: TAmazonConnectionInfo;
AmazonStorage : TAmazonStorageService;
s : TFileStream;
AmazonInfo : TCloudResponseInfo;
Bucket,Path,LocalPath : Unicodestring;
filename : Unicodestring;
content : TBytes;
AWSparam : Unicodestring;
AWSParamList : TStringList;
AWSResult : TAmazonBucketResult;
i,totcount,rp : integer;
firstname : Unicodestring;
failed : boolean;
begin
try
AmazonInfo:=TCloudResponseInfo.Create;
AmazonConnectionInfo:=TAmazonConnectionInfo.Create(nil);
{ TODO -oUser -cConsole Main : Insert code here }
AmazonConnectionInfo.AccountName:=ConfigParams.Values['user'];
AmazonConnectionInfo.AccountKey:=ConfigParams.Values['password'];
//AmazonConnectionInfo.Protocol:='HTTPS';
writeln(AmazonConnectionInfo.AccountName,AmazonConnectionInfo.AccountKey);
writeln(AmazonConnectionInfo.StorageEndpoint);
writeln(AmazonConnectionInfo.UseDefaultEndpoints);
writeln(AmazonConnectionInfo.RequestProxyHost);
Bucket:=ConfigParams.Values['DefBucket'];
Path:=ConfigParams.Values['DefFolder'];
if path[length(path)]<>'/' then path:=path+'/';
localPath:=ConfigParams.Values['DefDirectory']; if localpath[length(localpath)]<>'\' then localpath:=localpath+'\';
filename:=replacedate(paramlist.values['file']);
if paramlist.Values['bucket']<>'' then
bucket:=lowercase(paramlist.Values['bucket']);
if lowercase(paramlist.Values['command']) ='upload' then
begin
s:=TFileStream.Create(localpath+filename,fmOpenRead);
setlength(content,s.Size);
s.ReadBuffer(pointer(content)^,s.size);
// for I := 0 to s.Size-1 do
// write(content[i]);
writeln('tamaño=',s.Size);
amazonStorage:=TAmazonStorageService.Create(AmazonConnectionInfo);
rp:=0;
repeat
try
failed:=false;
AmazonStorage.UploadObject(bucket,path+filename,content,TRUE,nil,nil,amzbaPublicRead,AmazonInfo);
except
failed:=true;
end;
inc(rp)
until (rp=3) or ((amazonInfo.StatusCode=200) and not(failed));
writeln('UPLOAD ',path+uppercase(filename),amazonInfo.StatusMessage,' ',amazonInfo.StatusCode, 'tries=',rp);
s.Free;
end
else
if lowercase(paramlist.Values['command']) ='download' then
begin
s:=TFileStream.Create(localpath+filename,fmOpenWrite+fmCreate);
amazonStorage:=TAmazonStorageService.Create(AmazonConnectionInfo);
amazonStorage.GetObject(bucket,path+filename,s,amazonInfo);
writeln('DOWNLOAD',amazonInfo.StatusMessage);
s.free;
end
else
if lowercase(paramlist.Values['command']) ='list' then
begin
AWSParamList:=TStringList.Create;
Split(paramlist.Values['filter'],';',AWSParamList);
// writeln(AWSParamList.Text);
// s:=TFileStream.Create(localpath+filename,fmOpenWrite+fmCreate);
AmazonConnectionInfo.StorageEndpoint:='s3.amazonaws.com';
AmazonConnectionInfo.UseDefaultEndpoints:=false;
writeln(AmazonConnectionInfo.StorageURL(bucket));
amazonStorage:=TAmazonStorageService.Create(AmazonConnectionInfo);
firstname:='';
totcount:=0;
repeat
AWSParamList.Values['marker']:=firstname;
//AWSParamList.Values['delimiter']:='/';
AWSResult:=amazonStorage.GetBucket(bucket,AWSParamList,amazonInfo);
writeln(amazoninfo.StatusMessage,amazoninfo.Headers.Text);
// writeln(awsresult.name);
if awsresult.Objects.Count>0 then
begin
for I := 0 to awsresult.Objects.Count-1 do
writeln(awsresult.Objects[i].Name);
firstname:=awsresult.Objects[AWSResult.Objects.count-1].name;
end;
until awsresult.Objects.Count=0;
writeln('Total Files: ',totcount,' ',amazonInfo.StatusMessage);
writeln(paramlist.Text);
// for I := 0 to awsparamlist.count-1 do
// writeln(awsparamlist[i]);
end;
except
on E: Exception do
Writeln(E.ClassName, ': ', E.Message);
end;
end.
↧
↧
DElphi 10.2 Tokio Professional
I try to create FireMonkey UI Application, with Grid Style, or Split Style. When I creat project instantly obtain Application violation ... on "fmx250.blp".
How can I fix that?
↧
When will RSP-19525 correction come out
When will the patch for the problem reported in RSP-19525 to version 10.2.2?
↧
interbase install / repair
Installed 10.2.2 , then i manually went to the programs and features and removed the IE7 . Ran the repair using the iso install to get a fresh install of the interbase and no Ibconsole or IBMgr program.
services shows XE7 GDS_DB is running....
Thanks...
↧
Rad Studio Price
Rad studio tokyo has a price tag about 7000 USD in Turkey, is this normal?
(I don't mean it does not worth, but we mortals first develop then earn money) ;)
↧
↧
IDE takes 18 minutes to load!
I use RAD Studio XE2 and since installing Appmethod 1.17, it now takes 18 minutes, yes, 18 minutes to launch the IDE.
The splash screen shows, shows the different languages' c++ builder, Delphi are added, then proceeds to list all sorts of things, until, after a few seconds the message All design time packages loaded and then it sits, makes itself a cup of tea, lets the tea go cold and then drinks it, then washes the cup and saucer. Then after 18 minutes have elapsed, the IDE is presented!
This is the same now for Appmethod or RAD Studio XE2
I tried launching them with just one IDE language, e.g. Just C++ Builder, and no luck, still 18n minutes.
So, I removed Appmethod 1.17 hoping it would cure the ridiculous delay, but no, RAD Studio still takes 18 mins
Appmethod 1.17 re-installed again (best part of a working day to remove and install) but still, delay in launching either XE2 or Appmethod remains.
I have had to train myself to never close the IDE once open, or I remote connect from home before setting off to the office to start the IDE so it is waiting for me when I get to work, rather than me waiting for it!
Any ideas what the heck it is doing for so long? It used to be ready to code in less than 30 secs.
↧
how to compile a modification that I made in the source code of Delphi Tokyo 10.2.
Hello everyone,
I want to know how to compile a modification that I made in the source code of Delphi Tokyo 10.2.
I add a function in the unit: FireDAC.Comp.Client.pas, but so that I can use my modification and use the Debug I need to recompile the source.
Can someone explain to me how to do it?
Thank you in advance for your answers.
↧
FireDac : Using Sequences in SQL Server
Hi,
I have a database on SQL Server and I don't want to use IDENTITY because the value is returned after the POST.
I would prefer to use SEQUENCES to get the value immediately.Unfortunately, the list of SEQUENCES is not displayed on the TFDQuery.
How can I use SQL Server SEQUENCE like FireDac generators?
Thank you in advance.
↧
How to use a combobox in a master-detail relationship?
I have a master detail relationship between two datasets. Also I have a form where the user fills data to be inserted into/updated from the master table. I'd like to allow the user to select an item from the detail table and insert its id into the master table. When I'm using master-detail relationship that is available, that filters the items in the combobox. And I want the user to choose from all the items. If I break the relationship between the two datasets, I have all the items in the combobox, but there are no binding from the combobox to the master table.
So my question is how to use a combobox to choose a record from a dataset and then insert its id in a foreign key field from another table using livebindings?
↧
↧
TNetHTTPClient - using certificates
I am not sure where to go to get some examples on how to use this component using certificates.
It is getting really hard to learn new things if I don't have examples of "HOW TO".
Anyone? Anyone?
↧
Upgrade from Tokyo 10.2 to Tokyo 10.2.2
This may be the simplest question of all time, but "How do I upgrade Embarcadero from Tokyo 10.2 to 10.2.2?" Obviously, I'm very new to this IDE. I come from Visual Studio where it told you there was an update and you pressed "Update".
Thanks, Rob
↧
Starting the Interbase XE7 Server
After a Windows 10 Update I can't start the Interbase Server Manager. I allways get the Message: Unable to start the Server: unknown error.
Where is the Interbase.log file?
Thank you Reiner
↧
How to disable Multipaste/Clipboard History in Delphi 10 IDE
In Delphi 10 Seattle Multipaste and Clipboard History (formely Castalia) are now integrated in the iDE.
How can I disable this feature, because it is interfering with other programs, i.e. while Delphi 10 is running, I can not cut and paste in some other programs. And since I never use the multi paste and clipboard history in Delphi, I rather have them disabled (in earlier Delphi versions I just did not install Castalia).
↧
↧
How to get native button icons?
Hello everyone,
I have recently purchased Delphi, migrating away from Lazarus.
In Lazarus source code for the "TButton" component, there's a function that I believe to be relating to retrieving the system stock image for save, save as, undo, redo, copy, paste, etc. bitmaps. I need my button to retrieve these graphics based on what Operating System/Desktop Environment the user is using. I've only started programming a week ago, so don't really know how to use the following function - I usually don't venture into code that I don't yet know how to write for myself, however I need to learn how to get native button icons for my application to make it look native. Here's the aforementioned function, copies from the TButton source code:
function GetButtonIcon(idButton: Integer): TCustomBitmap;
var
BitmapHandle, MaskHandle: HBitmap;
begin
if ThemeServices.GetStockImage(idButton, BitmapHandle, MaskHandle) then
begin
Result := TBitmap.Create;
Result.Handle := BitmapHandle;
if MaskHandle <> 0 then
Result.MaskHandle := MaskHandle;
end
else
Result := GetDefaultButtonIcon(idButton);
end;
Does anybody know how I can use this function on Form Create to get the native bmps?
Thanks a lot for your help in advance!
↧
Windows 10 freezes when debugging with threads
Hi
I have a really annoying problem on both of my development computers running Delphi Seattle. When in debug mode, if I have threads running, then a lot of the time Windows 10 freezes. All open apps become non-responsive, including the task bar and Task Manager. The only thing that works is CTRL-ALT-DEL, and then selecting 'Sign Out'.
This doesn't appear to happen if my project is in release mode. And it happens at very random times. If I disable all background threads then it works fine.
Has anyone else experienced this, and can offer some help? What on earth in the debugger could cause Windows (the operating system) to become non-responsive?
Thanks in advance.
↧
Borland Delphi 5 licence
Dear embarcadero team,
i have a question regarding the licence of embarcadero. I have a request from a customer to make changes in a application written in Delphi 5, there are just some minor changes to be applied, so i don't want to migrate the whole code to a higher Delphi Version. I own the latest Delphi Tokyo release, but is it legally allowed to compile and redistribute an application compiled in D5 with a licence of embarcadero or are there any licence technical issues?
Thank you in advance
Michael Lorenzoni
↧
