Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

Help getting text from clipboard and copying it back

Posted on 2000-04-29
14
Medium Priority
?
165 Views
Last Modified: 2010-04-04
I need to click on a button and get the text that is in the clipboard and copy it to a string  (MyString: string)
Then my program alters MyString and immediately puts it back into the clipboard.
I need it  to be able to get more than 255 characters from/to the clipboard.

What I'm trying to do is simply change the return/linefeed characters to something else and copy the modified data back to clipboard.
0
Comment
Question by:Gwena
  • 6
  • 6
  • 2
14 Comments
 
LVL 7

Expert Comment

by:Motaz
ID: 2761678
Uses:
ClipBrd

On button's OnClick event:

var
  MyStr: string;
begin
  MyStr := ClipBoard.AsText;

Motaz
0
 
LVL 7

Accepted Solution

by:
Motaz earned 300 total points
ID: 2761714
the returning Value (MyStr) is a long Delphi string, and you can change it then you can assign the value again to the cliboard:

var
  MyStr: string;
begin
  MyStr := ClipBoard.AsText;
  for i:= 1 to Length(MyStr) do
   if MyStr[i] = #13 then
    MyStr[i]:= #YourChar;

  ClibBoard.AsText:= MyStr;
end;

Motaz

0
 
LVL 5

Author Comment

by:Gwena
ID: 2761718
Hi Motaz :-)

the astext can only get 255 chars... I need to get more than that.
I'm thinking that SetTextBuf and GetTextBuf
may be what I need... but I need an example of using them to get the clipboard and put it into a string and vice versa.
0
Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

 
LVL 7

Expert Comment

by:Motaz
ID: 2761729
Who told you that it can get only 255 characters? it can return unlimited size of string.

What version of Delphi did you have?

I test it with Delphi 5 and it returns more than 255 characters.

If it didn't work for you please post here the code of reading and setting the clipboard

Motaz
0
 
LVL 5

Author Comment

by:Gwena
ID: 2761737
Hi Motaz :-)

Your code seems to work!
The help file in delphi says that astext
will ONLY work up to 255 chars... I guess they
goofed huh ;-)  here is what delphi help says

"The string value of the AsText property is limited to 255 characters. If you need to set and retrieve more than 255 characters, use the SetTextBuf and GetTextBuf Clipboard methods."

So... I wonder how big a text string I could handle using this method?  I will check it out tomorrow..it's getting very late ;-)
0
 
LVL 5

Author Comment

by:Gwena
ID: 2761745
Adjusted points from 50 to 75
0
 
LVL 5

Author Comment

by:Gwena
ID: 2761746
Thanks Motaz... you really helped me here..
I have upped the points a wee bit :-)
0
 
LVL 3

Expert Comment

by:shenqw
ID: 2761747
try
  Clipboard.GetTextBuf;
  Clipboard.SetTextBuf
0
 
LVL 7

Expert Comment

by:Motaz
ID: 2761748
I'm not sure exactly but I think it is limited by computer memory (Vertual memory) but it will not exceed 2 G Bytes

Motaz
0
 
LVL 3

Expert Comment

by:shenqw
ID: 2761751
try
  Clipboard.GetTextBuf;
  Clipboard.SetTextBuf
0
 
LVL 7

Expert Comment

by:Motaz
ID: 2761762
Thanks very much
Motaz
www.geocities.com/motaz1
0
 
LVL 5

Author Comment

by:Gwena
ID: 2761773
Nice web site Motaz

The Ebook and the file encrypter program look interesting :-)

...Gwen..
0
 
LVL 7

Expert Comment

by:Motaz
ID: 2761786
I also visit your homepage, but is the EasyIP only get the local computer IP address?
0
 
LVL 5

Author Comment

by:Gwena
ID: 2762643
Hi Motaz

Yes it only gets the local ip... it's a very simple little program.
I put the source at the web site too.

...Gwen..
0

Featured Post

Get expert help—faster!

Need expert help—fast? Use the Help Bell for personalized assistance getting answers to your important questions.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Objective: - This article will help user in how to convert their numeric value become words. How to use 1. You can copy this code in your Unit as function 2. than you can perform your function by type this code The Code   (CODE) The Im…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Integration Management Part 2
Screencast - Getting to Know the Pipeline
Suggested Courses
Course of the Month15 days, 10 hours left to enroll

580 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question