UniHtmlMemo Nesnesine Resim Ekleme

[pro_imaj]

Merhaba;

 

UniHtmlMemo nesnesine resim nasıl ekleyebilirim.

 

Teşekkürler.

[Sherzod]

Hi,

 

This post can help you:

http://forums.unigui.com/index.php?/topic/5856-ckeditorelfinder-in-unigui-possible/

 

Best regards,

[pro_imaj]

Thank you very much @DelphiDeveloper. There's only one thing I need to solve.

How to add images added to the original dimensions?

 

image upload width ?  height ?

[Sherzod]

Hi,

 

Try this, without width and height:

 

4. UniFileUpload1 -> OnCompleted:

procedure TMainForm.UniFileUpload1Completed(Sender: TObject;
  AStream: TFileStream);
var
  DestName : string;
  DestFolder : string;
begin
  DestFolder:=UniServerModule.StartPath+'UploadFolder\';
  DestName:=DestFolder+ExtractFileName(UniFileUpload1.FileName);
  CopyFile(PChar(AStream.FileName), PChar(DestName), False);
  //UniSession.AddJS(UniHTMLMemo1.JSName + '.execCmd(''InsertHTML'', ''<img width="138" height="87" src="'+ 'UploadFolder/' + UniFileUpload1.FileName +'"></img>'')');
  UniSession.AddJS(UniHTMLMemo1.JSName + '.execCmd(''InsertHTML'', ''<img src="'+ 'UploadFolder/' + UniFileUpload1.FileName +'"></img>'')');
end;

Best regards,

[pro_imaj]

Thank you very much.

[pro_imaj]

It's the name I added before, but when I add a different picture, it always gets the old picture.

 

I unzipped the Debug \ UploadFolder folder and delete on and I copy these files one more time, but where?

 

C:\fakepath\2.png ?

 

[Sherzod]

Hi,

 

Sorry, can you clarify your question, issue ?!

[pro_imaj]

I told him about the video. Link here

 

Thanks

[Sherzod]

Ok, I will try to analyze it

 

Best regards,

[Sherzod]

Hi,

 

I told him about the video. Link here

 

Thanks

 

I did not fully analyze your issue, but I guess that this post can help you:

 

http://forums.unigui.com/index.php?/topic/5856-ckeditorelfinder-in-unigui-possible/page-2&do=findComment&comment=30321