From Clomosy Docs

No edit summary
No edit summary
 
(6 intermediate revisions by 2 users not shown)
Line 1: Line 1:
<div class="alert alert-ligth border border-3 border-primary-subtle rounded-5 p-4 shadow-sm" role="alert">
function clPathCombine(var FileNameString: String; CombinePathString:String);
</div>
<span style="color:blue">''FileNameString''</span> : Searched file name.<br>
<span style="color:blue">''CombinePathString''</span> : The file path to merge.<br>
clPathCombine is a function that is part of the Clomosy library. This function returns a string data by concatenating the file path and file name.
clPathCombine is a function that is part of the Clomosy library. This function returns a string data by concatenating the file path and file name.


The general usage is as follows:
The general usage is as follows:


clPathCombine(FileNameString:WideString; CombinePathString:String);
<div class="alert alert-secondary" role="alert" data-bs-theme="light">
 
CombinedPath = clPathCombine('File.txt','C:\Document');
<span style="color:blue">''FileNameString''</span> : Searched file name.
// Now CombinedPath will be 'C:\Document\File.txt'.
</div>


<span style="color:blue">''CombinePathString''</span> : The file path to merge.
<b>Example</b><br>


'''For instance:'''
If the file does not exist in the project directory, it saves the file. If the file exists, it adds a line to it.
CombinedPath := clPathCombine('File.txt','C:\Document');
When the application runs for the first time, it will not find the file, so it will add it to the file path and display a message.
  // Now CombinedPath will be 'C:\Document\File.txt'.
When run for the second time, a line is added to the existing file.


'''Example:'''
<pre>
var
  strList:TclStringList;
  fileStr:String;
  i : Integer;
{
  strList = Clomosy.StringListNew;
  fileStr = clPathCombine('File.Txt',Clomosy.AppFilesPath);


'''var'''
  If (clFileExists(fileStr,Clomosy.AppFilesPath))
  strList:TclStringList;
  {
  MyFileStr:String;
    strList.Add('New Line 1');
'''Begin'''
    strList.SaveToFile(fileStr,0);
  strList := Clomosy.StringListNew;
    ShowMessage('A line has been added to the existing file. To check, check your file via the file path. File path:'+#13#10+ fileStr);
  MyFileStr := ''clPathCombine''('MyFile.Txt',Clomosy.AppFilesPath);
   } else
   //ShowMessage(MyFileStr);
  {
    strList.SaveToFile(fileStr,0);
  If clFileExists(MyFileStr,'C:\Clomosy') Then
    ShowMessage('The file has been added to the directory. Directory path: '+#13#10+ fileStr)
   strList.LoadFromFile(MyFileStr,0);
   }
  strList.Add('New Line');
  if (strList.Count <= 0)
  strList.SaveToFile(MyFileStr,0);
    ShowMessage('Empty!');
'''End;'''
  else
  {
    for (i = 0 to strList.Count - 1)
      ShowMessage(Clomosy.StringListItemString(strList,i));
  }
}
</pre>


= See Also =
<h2> See Also </h2>
* [[Controls| Controls]]
* [[File_Handling | File Handling]]
{{#seo:|title=ClPathCombine in Clomosy - Clomosy Docs}}
{{#seo:|description=ClPathCombine in Clomosy allows you to merge file paths seamlessly, ensuring smooth file handling in your mobile applications.}}

Latest revision as of 13:23, 24 December 2024

FileNameString : Searched file name.
CombinePathString : The file path to merge.

clPathCombine is a function that is part of the Clomosy library. This function returns a string data by concatenating the file path and file name.

The general usage is as follows:

Example

If the file does not exist in the project directory, it saves the file. If the file exists, it adds a line to it. When the application runs for the first time, it will not find the file, so it will add it to the file path and display a message. When run for the second time, a line is added to the existing file. 

var
  strList:TclStringList;
  fileStr:String;
  i : Integer;
{
  strList = Clomosy.StringListNew;
  fileStr = clPathCombine('File.Txt',Clomosy.AppFilesPath);

  If (clFileExists(fileStr,Clomosy.AppFilesPath))
  {
    strList.Add('New Line 1');
    strList.SaveToFile(fileStr,0);
    ShowMessage('A line has been added to the existing file. To check, check your file via the file path. File path:'+#13#10+ fileStr);
  } else
  {
    strList.SaveToFile(fileStr,0);
    ShowMessage('The file has been added to the directory. Directory path: '+#13#10+ fileStr)
  }
  if (strList.Count <= 0)
     ShowMessage('Empty!');
   else
   {
     for (i = 0 to strList.Count - 1)
       ShowMessage(Clomosy.StringListItemString(strList,i));
   }
}

See Also

Retrieved from "http:///index.php?title=ClPathCombine&oldid=3702"